R Studio snippets

snippets.R

snippet updr
	options(repos=c(CRAN='http://cran.revolutionanalytics.com'))
	update.packages(ask=F)

snippet package.installer
	install.packages('devtools')
	library(devtools)
	install_github("ririzarr/rafalib")
	
	essential <- c('data.table', 'dplyr', 'reshape2', 'ggplot2', 'foreach', 'tidyr', 'ggvis',
	               'caret', 'caretEnsemble', 'Cairo', 'lubridate', 'Hmisc')
	
	plots <- c('Rtsne', 'GGally', 'gplots', 'ggdendro', 'amap', 'gridExtra', 'heatmap3', 'dendextend')
	other <- c( 'cluster', 'fastcluster', 'formatR', 'FactoMineR', 'polycor')
	
	if(.Platform$OS.type == 'windows') {
	  install.packages('doParallel')
	  install.packages('Cairo')
	} else if(.Platform$OS.type == 'unix') {
	  # doMC forks process, inherits variables, not sure about others
	  install.packages('doMC')
	  
	  # needs apt-get build-dep cairo
	  # and libcairo2-dev
	  cat('Cairo requires apt-get build-dep cairo; apt-get install libcairo2-dev')
	}
	# Caret may need "Imports"
	install.packages(essential, dependencies = c("Depends", "Suggests"), Ncpus = 2)
	
	#plots
	install.packages(plots, dependencies = c("Depends", "Suggests", Ncpus = 2)
	devtools::install_github("hrbrmstr/streamgraph")
	
	# other
	install.packages(other)
	install.packages("radiant", repos = "http://vnijs.github.io/radiant_miniCRAN/")