Database 관련 Packages
if("rJava" %in% installed.packages("rJava") == FALSE)install.packages("rJava")
library(rJava)
if("DBI" %in% installed.packages("DBI") == FALSE)install.packages("DBI")
library(DBI)
if("RJDBC" %in% installed.packages("RJDBC") == FALSE)install.packages("RJDBC")
library(RJDBC)
if("XML" %in% installed.packages("XML") == FALSE)install.packages("XML")
library(XML)
if("memoise" %in% installed.packages("memoise") == FALSE)install.packages("memoise")
library(memoise)
String 처리 Packages
if("dplyr" %in% installed.packages("dplyr") == FALSE)install.packages("dplyr")
library(dplyr)
if("data.table" %in% installed.packages("data.table") == FALSE)install.packages("data.table")
library(data.table)
if("stringi" %in% installed.packages("stringi") == FALSE)install.packages("stringi")
library(stringi)
if("stringr" %in% installed.packages("stringr") == FALSE)install.packages("stringr")
library(stringr)
if("plyr" %in% installed.packages("plyr") == FALSE)install.packages("plyr")
library(plyr)
tm
if("KoNLP" %in% installed.packages("KoNLP") == FALSE)install.packages("KoNLP")
library(KoNLP)
if("tm" %in% installed.packages("tm") == FALSE)install.packages("tm")
library(tm)
if("wordcloud" %in% installed.packages("wordcloud") == FALSE)install.packages("wordcloud")
library(wordcloud)
html
if("rvest" %in% installed.packages("rvest") == FALSE)install.packages("rvest")
library(rvest)
if("shiny" %in% installed.packages("shiny") == FALSE)install.packages("shiny")
library(shiny)
chart
if("ggplot2" %in% installed.packages("ggplot2") == FALSE)install.packages("ggplot2")
library(ggplot2)
if("ggthemes" %in% installed.packages("ggthemes") == FALSE)install.packages("ggthemes")
library(ggthemes)
if("RColorBrewer" %in% installed.packages("RColorBrewer") == FALSE)install.packages("RColorBrewer")
library(RColorBrewer)
if("reshape" %in% installed.packages("reshape") == FALSE)install.packages("reshape")
library(reshape)
font
if("extrafont" %in% installed.packages("extrafont") == FALSE)install.packages("extrafont")
library(extrafont)
ga(google analytics)
if("RGA" %in% installed.packages("RGA") == FALSE)install.packages("RGA")
library(RGA)
if("ggmap" %in% installed.packages("ggmap") == FALSE)install.packages("ggmap")
library(ggmap)
if("googleVis" %in% installed.packages("googleVis") == FALSE)install.packages("googleVis")
library(googleVis)
exel
##exel
if("tidyverse" %in% installed.packages("tidyverse") == FALSE)install.packages("tidyverse")
library(tidyverse)
if("readxl" %in% installed.packages("readxl") == FALSE)install.packages("readxl")
library(readxl)
Add a new chunk by clicking the Insert Chunk button on the toolbar or by pressing Ctrl+Alt+I.
LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KDQpEYXRhYmFzZSDqtIDroKggUGFja2FnZXMgDQoNCmBgYHtyfQ0KaWYoInJKYXZhIiAlaW4lIGluc3RhbGxlZC5wYWNrYWdlcygickphdmEiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJySmF2YSIpDQpsaWJyYXJ5KHJKYXZhKQ0KaWYoIkRCSSIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoIkRCSSIpID09IEZBTFNFKWluc3RhbGwucGFja2FnZXMoIkRCSSIpDQpsaWJyYXJ5KERCSSkNCmlmKCJSSkRCQyIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoIlJKREJDIikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygiUkpEQkMiKQ0KbGlicmFyeShSSkRCQykNCmlmKCJYTUwiICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCJYTUwiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJYTUwiKQ0KbGlicmFyeShYTUwpDQppZigibWVtb2lzZSIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoIm1lbW9pc2UiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJtZW1vaXNlIikNCmxpYnJhcnkobWVtb2lzZSkNCmBgYA0KDQoNClN0cmluZyDsspjrpqwgUGFja2FnZXMNCmBgYHtyfQ0KaWYoImRwbHlyIiAlaW4lIGluc3RhbGxlZC5wYWNrYWdlcygiZHBseXIiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJkcGx5ciIpDQpsaWJyYXJ5KGRwbHlyKQ0KaWYoImRhdGEudGFibGUiICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCJkYXRhLnRhYmxlIikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygiZGF0YS50YWJsZSIpDQpsaWJyYXJ5KGRhdGEudGFibGUpDQppZigic3RyaW5naSIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoInN0cmluZ2kiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJzdHJpbmdpIikNCmxpYnJhcnkoc3RyaW5naSkNCmlmKCJzdHJpbmdyIiAlaW4lIGluc3RhbGxlZC5wYWNrYWdlcygic3RyaW5nciIpID09IEZBTFNFKWluc3RhbGwucGFja2FnZXMoInN0cmluZ3IiKQ0KbGlicmFyeShzdHJpbmdyKQ0KaWYoInBseXIiICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCJwbHlyIikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygicGx5ciIpDQpsaWJyYXJ5KHBseXIpDQpgYGANCg0KdG0NCmBgYHtyfQ0KaWYoIktvTkxQIiAlaW4lIGluc3RhbGxlZC5wYWNrYWdlcygiS29OTFAiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJLb05MUCIpDQpsaWJyYXJ5KEtvTkxQKQ0KaWYoInRtIiAlaW4lIGluc3RhbGxlZC5wYWNrYWdlcygidG0iKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJ0bSIpDQpsaWJyYXJ5KHRtKQ0KaWYoIndvcmRjbG91ZCIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoIndvcmRjbG91ZCIpID09IEZBTFNFKWluc3RhbGwucGFja2FnZXMoIndvcmRjbG91ZCIpDQpsaWJyYXJ5KHdvcmRjbG91ZCkNCmBgYA0KDQpodG1sDQpgYGB7cn0NCmlmKCJydmVzdCIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoInJ2ZXN0IikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygicnZlc3QiKQ0KbGlicmFyeShydmVzdCkNCmlmKCJzaGlueSIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoInNoaW55IikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygic2hpbnkiKQ0KbGlicmFyeShzaGlueSkNCmBgYA0KDQpjaGFydA0KYGBge3J9DQppZigiZ2dwbG90MiIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoImdncGxvdDIiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJnZ3Bsb3QyIikNCmxpYnJhcnkoZ2dwbG90MikNCmlmKCJnZ3RoZW1lcyIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoImdndGhlbWVzIikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygiZ2d0aGVtZXMiKQ0KbGlicmFyeShnZ3RoZW1lcykNCmlmKCJSQ29sb3JCcmV3ZXIiICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCJSQ29sb3JCcmV3ZXIiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJSQ29sb3JCcmV3ZXIiKQ0KbGlicmFyeShSQ29sb3JCcmV3ZXIpDQppZigicmVzaGFwZSIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoInJlc2hhcGUiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJyZXNoYXBlIikNCmxpYnJhcnkocmVzaGFwZSkNCmBgYA0KDQpmb250DQpgYGB7cn0NCmlmKCJleHRyYWZvbnQiICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCJleHRyYWZvbnQiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJleHRyYWZvbnQiKQ0KbGlicmFyeShleHRyYWZvbnQpDQpgYGANCg0KZ2EoZ29vZ2xlIGFuYWx5dGljcykNCmBgYHtyfQ0KaWYoIlJHQSIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoIlJHQSIpID09IEZBTFNFKWluc3RhbGwucGFja2FnZXMoIlJHQSIpDQpsaWJyYXJ5KFJHQSkNCmlmKCJnZ21hcCIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoImdnbWFwIikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygiZ2dtYXAiKQ0KbGlicmFyeShnZ21hcCkNCmlmKCJnb29nbGVWaXMiICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCJnb29nbGVWaXMiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJnb29nbGVWaXMiKQ0KbGlicmFyeShnb29nbGVWaXMpDQpgYGANCg0KZXhlbA0KYGBge3J9DQojI2V4ZWwNCmlmKCJ0aWR5dmVyc2UiICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCJ0aWR5dmVyc2UiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJ0aWR5dmVyc2UiKQ0KbGlicmFyeSh0aWR5dmVyc2UpDQppZigicmVhZHhsIiAlaW4lIGluc3RhbGxlZC5wYWNrYWdlcygicmVhZHhsIikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygicmVhZHhsIikNCmxpYnJhcnkocmVhZHhsKQ0KYGBgDQoNCg0KQWRkIGEgbmV3IGNodW5rIGJ5IGNsaWNraW5nIHRoZSAqSW5zZXJ0IENodW5rKiBidXR0b24gb24gdGhlIHRvb2xiYXIgb3IgYnkgcHJlc3NpbmcgKkN0cmwrQWx0K0kqLg0KDQoNCg==