1. Change R Repository
(r = getOption("repos"))
##     CRAN 
## "@CRAN@"
r["CRAN"] = "http://cran.seoul.go.kr"
options(repos = r)
rm(r)