annotate individuals.Rmd @ 7:23cbb0daf18d draft default tip

planemo upload commit d1d9c6fc42729b4194adac13d1b71062bf19ad0b-dirty
author mingchen0919
date Mon, 02 Apr 2018 10:53:05 -0400
parents 4f9f1e76f7e6
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
1 ---
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
2 title: 'Expose data (paired)'
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
3 output: html_document
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
4 ---
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
5
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
6 <style>
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
7 pre code, pre, code {
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
8 white-space: pre !important;
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
9 overflow-x: scroll !important;
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
10 word-break: keep-all !important;
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
11 word-wrap: initial !important;
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
12 }
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
13 </style>
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
14
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
15 ```{r setup, include=FALSE, warning=FALSE, message=FALSE}
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
16 knitr::opts_chunk$set(error = TRUE)
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
17 ```
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
18
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
19 ## User input
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
20
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
21 ```{r, echo=FALSE, eval=TRUE}
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
22 ##-------- build script files -----------
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
23
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
24 # build script file: script.sh
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
25 df = read.table(paste0(Sys.getenv('REPORT_FILES_PATH'), '/options_and_arguments.txt'),
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
26 sep = '|', header = TRUE)
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
27
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
28
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
29 knitr::kable(df)
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
30 ```
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
31
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
32 ```{r, echo=FALSE}
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
33 # write('', file = paste0(Sys.getenv('REPORT_FILES_PATH'), '/script.sh'))
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
34 if (nrow(df) > 0) {
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
35 for (i in 1:nrow(df)) {
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
36 tool_output_dir = readLines(df[i, 'tool_output_dir'])[1]
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
37 full_path = paste0(tool_output_dir, '/', df[i, 'relative_path'])
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
38 if (dir.exists(full_path)) {
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
39 from_files = list.files(full_path, full.names = TRUE)
4
9ff33a3631fa planemo upload commit 979e0f1c28c74ca7df02ef20c2208e9677bc820a-dirty
mingchen0919
parents: 3
diff changeset
40 to_files = list.files(full_path)
9ff33a3631fa planemo upload commit 979e0f1c28c74ca7df02ef20c2208e9677bc820a-dirty
mingchen0919
parents: 3
diff changeset
41 to_files = paste0(individual_outputs_path, to_files)
3
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
42 file.copy(from = from_files, to = to_files)
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
43 }
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
44 if (file.exists(full_path)) {
4
9ff33a3631fa planemo upload commit 979e0f1c28c74ca7df02ef20c2208e9677bc820a-dirty
mingchen0919
parents: 3
diff changeset
45 # to_files = list.files(full_path)
9ff33a3631fa planemo upload commit 979e0f1c28c74ca7df02ef20c2208e9677bc820a-dirty
mingchen0919
parents: 3
diff changeset
46 to_file = tail(strsplit(full_path, '/')[[1]], 1)
9ff33a3631fa planemo upload commit 979e0f1c28c74ca7df02ef20c2208e9677bc820a-dirty
mingchen0919
parents: 3
diff changeset
47 file.copy(from = full_path, to = paste0(individual_outputs_path, to_file))
3
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
48 }
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
49 # command_line = paste0('cp -r ', full_path, ' paired')
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
50 # write(command_line, append = TRUE,
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
51 # file = paste0(Sys.getenv('REPORT_FILES_PATH'), '/script.sh'))
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
52 }
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
53 }
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
54 ```
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
55
5838300fc1aa add expose individuals
mingchen0919
parents:
diff changeset
56