commented out setwd()