# NOT RUN {
file0 <- file.path(pullSourceInfo("adaprHome")$project.path,
project.directory.tree$analysis,"read_data.R")
createFileInfo(dirname(file0),basename(file0),"a program that reads")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab