180901 install_pkg
if("ggplot2" %in% installed.packages("ggplot2") == FALSE)install.packages("ggplot2")
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")
LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KDQoxODA5MDEgaW5zdGFsbF9wa2cNCg0KYGBge3J9DQppZigiZ2dwbG90MiIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoImdncGxvdDIiKSA9PSBGQUxTRSlpbnN0YWxsLnBhY2thZ2VzKCJnZ3Bsb3QyIikNCmlmKCJkcGx5ciIgJWluJSBpbnN0YWxsZWQucGFja2FnZXMoImRwbHlyIikgPT0gRkFMU0UpaW5zdGFsbC5wYWNrYWdlcygiZHBseXIiKQ0KbGlicmFyeShkcGx5cikNCmlmKCJkYXRhLnRhYmxlIiAlaW4lIGluc3RhbGxlZC5wYWNrYWdlcygiZGF0YS50YWJsZSIpID09IEZBTFNFKWluc3RhbGwucGFja2FnZXMoImRhdGEudGFibGUiKQ0KDQpgYGA=