Mercurial > repos > mingchen0919 > rmarkdown_collection_builder

comparison collection_list_paired.Rmd @ 6:a0c8b2b25774 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/statonlab/docker-GRReport/tree/master/my_tools/rmarkdown_collection_builder commit 88ca36a41aa577ba888cee39cf81b176bf7e68db
author mingchen0919
date Tue, 26 Sep 2017 13:33:22 -0400
parents 66022ba24ac7
children f555686ca340
comparison
equal deleted inserted replaced
5:66022ba24ac7 6:a0c8b2b25774
1 --- 1 ---
2 title: 'Collection builder (collection type: list:paired)' 2 title: 'Build collection: a list of paired datasets'
3 output: 3 output:
4 html_document: 4 html_document:
5 number_sections: true 5 number_sections: true
6 toc: true 6 toc: true
7 theme: cosmo 7 theme: cosmo
39 file.copy(from_files, './forward_files_directory') 39 file.copy(from_files, './forward_files_directory')
40 # get original file names 40 # get original file names
41 original_files = list.files('./forward_files_directory') 41 original_files = list.files('./forward_files_directory')
42 # create new files names from original file names 42 # create new files names from original file names
43 new_files = gsub('\\.dat', '_forward\\.FORMAT', original_files) 43 new_files = gsub('\\.dat', '_forward\\.FORMAT', original_files)
44 new_files = paste0('input_', 1:length(original_files), '_forward.FORMAT') 44 new_files = paste0('input', 1:length(original_files), '_forward.FORMAT')
45 new_files 45 new_files
46 # rename files 46 # rename files
47 file.copy(paste0('./forward_files_directory/', original_files), 47 file.copy(paste0('./forward_files_directory/', original_files),
48 paste0('./files_directory/', new_files)) 48 paste0('./files_directory/', new_files))
49 ``` 49 ```
59 file.copy(from_files, './reverse_files_directory') 59 file.copy(from_files, './reverse_files_directory')
60 # get original file names 60 # get original file names
61 original_files = list.files('./reverse_files_directory') 61 original_files = list.files('./reverse_files_directory')
62 # create new files names from original file names 62 # create new files names from original file names
63 new_files = gsub('\\.dat', '_reverse\\.FORMAT', original_files) 63 new_files = gsub('\\.dat', '_reverse\\.FORMAT', original_files)
64 new_files = paste0('input_', 1:length(original_files), '_reverse.FORMAT') 64 new_files = paste0('input', 1:length(original_files), '_reverse.FORMAT')
65 new_files 65 new_files
66 # rename files 66 # rename files
67 file.copy(paste0('./reverse_files_directory/', original_files), 67 file.copy(paste0('./reverse_files_directory/', original_files),
68 paste0('./files_directory/', new_files)) 68 paste0('./files_directory/', new_files))
69 ``` 69 ```
70