In ShanYiran/scCorrNet:

options(knitr.table.format = "html") 
options(scipen=10)
knitr::opts_chunk$set(echo = TRUE, fig.path = file.path(results$savePath, 'report-figures//'))
title <- "scCorrNet"
if(!is.null(results$sampleName)){
  title <- paste0(results$sampleName, "  -  ", title)
}
if(!is.null(results$authorName)){
  userName <- results$authorName
}else{
  userName <- Sys.getenv("USERNAME")
}
reportMark <- Sys.time()
if(userName != ""){
  reportMark <- paste0(userName, " , ", reportMark)
}
h.i <- 1
h.ii <- 1

r title

---

r reportMark

r h.i Read data

Enrichment results.

results$EnrichPlots$go.dot

(Hi-res image: view)

results$EnrichPlots$go.bar

(Hi-res image: view)

results$EnrichPlots$kegg.dot

(Hi-res image: view)

results$genePair$hist_pvalue

(Hi-res image: view)

results$genePair$hist_disvalue

(Hi-res image: view)

results$CorrScorePlot

(Hi-res image: view)

h.i <- h.i + 1

---

© G-Lab, Tsinghua University

ShanYiran/scCorrNet documentation built on Dec. 7, 2019, 12:19 p.m.