잡동사니 상자

코로나19가 세상무서운줄 모르고 빠르게 확진자가 나타나고 있다. 잠잠해질줄 알았는데 잠잠해지질 않네... 다들 조심하시길 바라며.. 오늘 예전부터 작성하려고 했던 ggplot을 이용한 그래프그리기의 자료로 해당 자료를 활용하고자 한다. csv파일로 갖고 있었으면 좋겠지만, 없으니 질병관리본부 현황판에 아침마다 업데이트 되는 자료를 활용하기로 한다. 웹페이지 내에서 테이블을 바로 뗘오는... 단순무식한 방법으로다가.. library(XML) library(data.table) library(dplyr) library(ggplot2) library(ggthemes) 질병관리본부에서 만든 0시 기준 자료다.. 실시간으로 반영하지는 않는것 같다. 이 표를 고대로 R로 따온다. #코로나바이러스감영증-19 웹페이지..

여행 계획을 짜다보면 좋은 툴들이 많다. 효율적인 동선을 짜기 위한 여러 어플리케이션도 있고, 간단하게는 google map을 이용해서 동선을 짜기도 한다. 이번에는 카카오 개발자센터에서 지원하는 REST API 기능을 이용해서 여행지도를 그려보려고 한다. 예전에 공공데이터 open API를 사용하는 포스팅이 꾸준히 찾는 걸 보면 많은 사람들이 R에서 API를 사용하는 것을 원하는 것 같다. 2017/10/26 - [데이터 갖고 놀기/공공데이터 갖고 놀기] - 공공데이터 open api _ R 공공데이터 open api _ R 공공데이터 open api 듣기는 많이 들었는데... 실제로는 api 호출법을 몰라서 어떻게 하는것인지 인터넷을 한참 찾아봤다... 다들 api를 호출해서 xml 형태를 data...

급하고 아쉬운 상황에서 우물을 판다고... 단순 반복 번역 일거리가 생겼다.. 영문명을 국문으로 그대로 옮겨적은 글자를 다시 영문명으로 바꾸는 것.. 한 두개면 상관이 없는데... 양이.. 생각보다 많았다.. 그래서 찾아보았다.. 번역 API 를 쓰기로.. 몇가지 후보가 있었는데 .. 1. 구글 2. 파파고 3. 빙 4. 카카오 1. 구글.. API 정책이 변경된지 한참 된 것 같다. 유료로 과금이 들어가는.. 50만자 이하는 무료인거 같기도 하고 아닌거 같기도 하고.. 다음에 도전을 해봐야겠다. 지금 당장은 삽질도 해야 하기 때문에 다른 API를 사용하기로 했다. 2. 파파고 해외여행갈때 그 기술을 입증받은.. 우리의 파파고.. 일일 제한 음.절. 이 1,000자로 제한 적이다.. 패스. 3. 빙 무료..

R을 뭐 전문적으로 막 쓰는게 아니라 그냥 여지껏 배운것들을 잊어버리지 않기 위해.. 딱.. 엑셀 정도의 수준으로 유지하고 있는데, 가끔씩 자주 썼지만, 잘 잊어버리는 내용들을 정리하고자 한다. 비전공자로써 처음보면 익히는것도 싫고, 뭐에 쓰나 싶을 정도로 이상했던 "정규표현식" 당장에 필요가 없고, 필요할때마다 googling을 통해 그때 그때 썼는데.. 이제 "정규표현식"의 필요성을 점차 느끼고 있다. 내가 잘 쓰는 수식중에 하나는 gsub 이다. 찾아바꾸기... df$temp=gsub("변경전","변경후",df$temp) 위의 기능을 썼을때, 일반적일때는 크게 상관이 없지만, 예를 들어 ["사과", "사과나무"] 등의 요소가 있어서 "사과"를 배로 바꾸고자 하면 df=c("사과","사과나무") df..

쇼핑분야 트렌드 비교 대상 : 여성 10대 ~ 50대 시기 : 2017.08 ~ 2019.현재 자료출처 : 네이버 빅데이터랩트렌드 항목 : 스킨케어 / 색조메이크업 / 썬케어 우연찮은 기회로 네이버 빅데이터랩에서 화장품 제품의 키워드 검색 결과와 함께 쇼핑분야 트렌드 검색을 하게 되었으며, 나름 흥미롭고 재미있을 것 같은 검색 결과가 도출되어 해당 내용을 공유하고자 한다. 회사의 업무와 겹치는 부분이어서 회사에 보고용으로 작성할 땐 조금 더 내부 자료를 활용하여 작성을 하겠지만, 크게 변할 것 같지는 않다. (블로그용은 자유롭게 내 생각이 주가 되게.. J ) 처음엔 오픈마켓 (11번가, 쿠팡, 티몬 등)의 제품 판매 정보 등의 자료를 구하고 싶었으나, 사실상 불가능에 가까운 사항이었고, 카드사의 정보 ..

설문조사결과를 받다보면 복수응답으로 응답을 해서 코딩 시 한개의 셀안에 1,2,3 등으로 코딩해주는 곳이 가끔 있다. raw data를 받고 참 난감했는데 잠깐 머리를 굴려보니 function 기능을 이용해서 한방에 카운팅까지 끝내는 방법을 찾고야 말았다. 역시 아쉬운 사람이 우물을 파는 것인가.. 1. str() 함수를 통해 해당 셀의 속성을 파악한 뒤, 2. character 로 속성을 바꿔준다. 3. ","를 기준으로 문자열을 분리 시켜주고..4. unlist 형태로 바꿔서..5. 내림차순으로 카운팅.. 이걸 코드로 바꿔버리면.. f=function(x){ x=as.character(x) #2 temp=strsplit(x, ",") #3 a=unlist(temp) #4 a=sort(table(a),..

오랫만에 공공데이터 홈페이지 접속했다.. 요즘 모든것에 의욕이 꺾여서.. 아무것도 안하다가... 그냥 ... 한번 해봤다.. 경기도 데이터 드림 사이트에서 건저온 경기도 지역 공업 현황... 2018년 1월 11일 최종 수정 날짜니까..최신 정보가 있겠지... 먼저 공장 위치 먼저... 보면.. 각 시별로 공장 위치는.. 화성이 단연 압도적으로.. 9,453개의 공장이 등록되어 있었고 양주군은... 1개..? ... 정말일까... 의문이다.. 그 다음으로... 산업 단지별 기업 분포는.. Top 1,2,3 위를 제외하곤 다들 3자리 숫자의 기업체들이 있는 것으로 보아.. 저 Top 3 위의 산업단지에 대한 매리트가 엄청난 것 같다.. 혹은 거대 기업들로 인해 하청 기업들이 밀집해있을까? 그것까지는 나중에..

지난번에 반복되는 코드를 축약시키는 function에 대해서 나름 정리한다고 정리하고... 사용하던 찰라.. 2017/11/09 - [실전 전투 R] - function() 을 찾다.. t.test 까지 포함한 function을 만들면 더 편하겠다라는 생각에 다시 구글링을 시작하였다... 지난 버전은 ddplyr로 평균과 표준편차를 구해서 error bar까지 그린 ggplot을 작성했는데 간단하게 생각하고 그냥 t.test 결과만 붙일 생각을 했는데... 안됩디다... 그러다가 찾은 패키지 .. "ggpurb" 세상 편하다... 결국 function의 코드도 대폭 줄일 수 있게 되었다. . f=function(x){ s=select(df3, c("region",x)) Spring=filter(s, re..

하다보면... 같은 코드를 같이 계속 쓰게 되는 경우가 발생한다... 게다가 그게 줄줄이 써야하는 경우라면... 너무 귀찮았는데.. 불편함과 귀찮음이 계속되니.. 배움이란것을 찾게되어.. function() 을 찾아 보게 되었다.. 말그대로 나만의 함수식을 만들어서 사용하는 것인데... 내가 지금 당장 간단히 필요한건.. 평균, 분산, 편차 그리고 ggplot 까지.. 물론 ddply 패키지를 써서 한번에 나오기는 하지만.. 그래도 사람인지라 더 편한걸 찾다보니... 정말 간단한 수식들이다.. 하지만 계속 타이핑 하다보면 손가락도 아프고 시간 아깝단 생각도 들고.. 해서 만들게 되었다.. function() 을... a=c(2,3,4,5,6,7,8,9,10) b=c(4,7,2,8,6,5,3,9,6,2) ..

공공데이터 포탈에서 open API 로 2010년 ~ 2017년 까지의 오존 경보 발령 현황을 수집하였다 생각보다 많은 데이터량이 아닌 1,043건.. 뉴스에선 더 많이 언급되는거 같은데... 뭔가 이상하다.. 잘못 모았나.. 연도별로 확실히 2016년도 부터 200건 이상 오존 경보가 발생되었는데.. 이상한건.. 2015년도... 왜 29건 밖에 없는지.. 주로 부산, 경남 등 남부 지역에서 많이 발생했고, 경기나 서울 지역에 대한 발생은 적게 되었다. 뭔가 누락이 된거 같은데.. 기분탓이겠지.. 실제로 발생지역에 따라 보면.. 경기, 서울 지역에 많은 빈도로 발생이 되었는데.. 15년도는 쏙 빠졌다.. 뭐.. 색깔이 헷갈리긴 하지만.. 2015년도 데이터가 현저하게 바닥을 기고 있는... 여튼.. 2..