Mercurial > repos > mingchen0919 > aurora_htseq
comparison rmarkdown_report_render.R @ 17:d67cb594f242 draft
planemo upload commit 09b6a41798350090b61aea16966ba64b583ef02b-dirty
| author | mingchen0919 |
|---|---|
| date | Sat, 09 Jun 2018 23:39:02 -0400 |
| parents | 83037540f829 |
| children |
comparison
equal
deleted
inserted
replaced
| 16:83037540f829 | 17:d67cb594f242 |
|---|---|
| 89 { | 89 { |
| 90 if (length(dirs) > 0) { | 90 if (length(dirs) > 0) { |
| 91 lapply(dirs, function(x) { | 91 lapply(dirs, function(x) { |
| 92 path_end = tail(strsplit(x, '/')[[1]], 1) | 92 path_end = tail(strsplit(x, '/')[[1]], 1) |
| 93 # hide vakata-jstree-3.3.5 folder | 93 # hide vakata-jstree-3.3.5 folder |
| 94 if (!(path_end %in% c('vakata-jstree-3.3.5', 'rmarkdown_report_files'))) { | 94 if (!(path_end %in% c('vakata-jstree-3.3.5', 'rmarkdown_report_files', 'site_libs'))) { |
| 95 # x_path = strsplit(x, paste0(output_dir, '/'))[[1]][2] | 95 # x_path = strsplit(x, paste0(output_dir, '/'))[[1]][2] |
| 96 li_item = tags$li(path_end, file_tree(x)) | 96 li_item = tags$li(path_end, file_tree(x)) |
| 97 li_item$attribs = list('data-jstree' = '{"icon":"jstree-folder"}') | 97 li_item$attribs = list('data-jstree' = '{"icon":"jstree-folder"}') |
| 98 li_item | 98 li_item |
| 99 } | 99 } |
