Nothing
files <- c( 'Files.md', 'PlotSets.md', 'Plotting.md', 'Heatmaps.md', 'Outputs.md', 'Batch.md', 'SaveAndLoad.md', 'AdvOup.md', 'Genomes.md', 'Errors.md', 'Terms.md', 'References.md' ) err <- try({ npos <- which(rev(strsplit(getwd(), '/')[[1]]) == "seqplots")-1 if(!length(npos)) npos <- 1 ppath <- paste(rep('../', npos), collapse = '') }) if(class(err) =='try-error') ppath <- '../' cat(knitr::knit_child( text = gsub( "img/", paste0(ppath, "inst/seqplots/www/help/img/"), unlist(lapply(file.path(paste0(ppath, 'inst/seqplots/www/help'), files), readLines)) ), quiet = TRUE ), sep = '\n')
sessionInfo()
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.