ii <- installed.packages()[,"Package"] pp <- paste("install.packages('",ii,"')", sep="") setwd("C:\\Documents and Settings\\Rich\\Desktop") write.table(pp,"myRpacks.R", row.names=F, quote=F)