?package.skeleton
setwd("~/.strat")
system("ls")
setwd("~/.strat/strat")
ls()
package.skeleton(name = "strat")
