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