Mercurial > repos > mingchen0919 > rmarkdown_bdss_client
comparison bdss_client.Rmd @ 21:a709a705ce09 draft
planemo upload for repository https://github.com/statonlab/docker-GRReport/tree/master/my_tools/rmarkdown_bdss_client commit 813dcaa22f297814dd6d6a8c4c5ff01664942aa6-dirty
author | mingchen0919 |
---|---|
date | Sat, 14 Oct 2017 19:54:57 -0400 |
parents | c2150a0f9c7c |
children | fd15cf620d5d |
comparison
equal
deleted
inserted
replaced
20:531c00a2acbf | 21:a709a705ce09 |
---|---|
8 highlight: tango | 8 highlight: tango |
9 --- | 9 --- |
10 | 10 |
11 ```{r setup, include=FALSE, warning=FALSE, message=FALSE} | 11 ```{r setup, include=FALSE, warning=FALSE, message=FALSE} |
12 knitr::opts_chunk$set( | 12 knitr::opts_chunk$set( |
13 echo = ECHO | 13 echo = ECHO, |
14 error=TRUE | |
14 ) | 15 ) |
15 ``` | 16 ``` |
16 | 17 |
17 # Command line arguments | 18 # Command line arguments |
18 | 19 |
37 # download and extract reads | 38 # download and extract reads |
38 urls = strsplit(gsub(',', ' ', 'URLS'), ' ')[[1]] | 39 urls = strsplit(gsub(',', ' ', 'URLS'), ' ')[[1]] |
39 urls = urls[urls != ''] | 40 urls = urls[urls != ''] |
40 # loop through SRA accessions to download and extract reads. | 41 # loop through SRA accessions to download and extract reads. |
41 for(url in urls) { | 42 for(url in urls) { |
43 print(url) | |
42 bdss_command = paste0('/tool_deps/_conda/bin/bdss transfer --destination read_files_directory -u ', url) | 44 bdss_command = paste0('/tool_deps/_conda/bin/bdss transfer --destination read_files_directory -u ', url) |
45 print(bdss_command) | |
43 print(system(bdss_command, intern = TRUE)) | 46 print(system(bdss_command, intern = TRUE)) |
44 } | 47 } |
48 # all files that need to be saved should be moved to REPORT_DIR directory | |
49 # print(system('mv read_files_directory REPORT_DIR', intern = TRUE)) | |
45 ``` | 50 ``` |
46 | 51 |
47 | 52 |