Skip to content

Instantly share code, notes, and snippets.

View woons's full-sized avatar

Yeowoon woons

  • SBS Investigative Journalism
  • Seoul
View GitHub Profile
library(XML)
library(RCurl)
library(tidyverse)
# DaumMap APIKEY
APIKey <- ""
# Request Parameters
getUrls <- function(address, type){
url <- "http://apis.daum.net/local/geo/addr2coord?apikey="
@woons
woons / gist:9aad8044089b0f382cb8969489d3bfd8
Created June 23, 2018 00:54
multiple_waffle _chart_r
################################
# 와플차트 만들기 메뉴얼
################################
library(tidyverse)
df <- read_csv("https://docs.google.com/spreadsheets/d/e/2PACX-1vSoQVUDDcKYstVCn5l6h4JJmtoWWb7NmxaJFNCL-u3rUBaAqKfLO6cPPEAwWDOD1ZfIC8UOv31cgZAn/pub?gid=0&single=true&output=csv")
# 사각형 칼러 메뉴얼 지정
pallete <- c("#E53D36", "#FFA644", "#998A2F", "#295949", "#002D40",
@woons
woons / gist:273367b0d5f8af6a71b858e5eddf8907
Last active April 3, 2020 17:02
googlesheets in r (test)
library(googlesheets)
library(tidyverse)
# Each Google Spreadsheet has a limit of 400,000 cells, with a maximum of 256 columns per sheet.
# There are also other limitations: Number of Formulas: 40,000 cells containing formulas.
# Number of Tabs: 200 sheets per workbook
##################################################
# gs_auth로 계정 인증 받기
##################################################
@woons
woons / gist:e34fa3f73d354619ab98d4c190d3787f
Created March 7, 2019 07:45
reading multiple csv files
#######################################################################
# 방법1
# 프로젝트 경로에 특정 폴더를 생성하고 그 안에 csv파일을 한번에 가져오고자 한다면
# 'data'란 이름의 폴더 안에 파일을 생성했음
#######################################################################
devtools::install_github("andrewbtran/muckrakr")
library(muckrakr)
df <- bulk_csv(folder = "data")