Alper Kucukural
| Snapshot Date: 2021-10-14 04:50:12 -0400 (Thu, 14 Oct 2021) |
| git_url: https://git.bioconductor.org/packages/debrowser |
| git_branch: RELEASE_3_13 |
| git_last_commit: 3379462 |
| git_last_commit_date: 2021-08-11 22:11:22 -0400 (Wed, 11 Aug 2021) |
| Back to Multiple platform build/check report for BioC 3.13 |
|
This page was generated on 2021-10-15 15:06:02 -0400 (Fri, 15 Oct 2021).
|
To the developers/maintainers of the debrowser package: - Please allow up to 24 hours (and sometimes 48 hours) for your latest push to git@git.bioconductor.org:packages/debrowser.git to reflect on this report. See How and When does the builder pull? When will my changes propagate? here for more information. - Make sure to use the following settings in order to reproduce any error or warning you see on this page. |
| Package 453/2041 | Hostname | OS / Arch | INSTALL | BUILD | CHECK | BUILD BIN | ||||||||
| debrowser 1.20.1 (landing page) Alper Kucukural
| nebbiolo1 | Linux (Ubuntu 20.04.2 LTS) / x86_64 | OK | OK | OK | | ||||||||
| tokay2 | Windows Server 2012 R2 Standard / x64 | OK | OK | OK | OK | | ||||||||
| machv2 | macOS 10.14.6 Mojave / x86_64 | OK | OK | OK | OK | | ||||||||
| Package: debrowser |
| Version: 1.20.1 |
| Command: C:\Users\biocbuild\bbs-3.13-bioc\R\bin\R.exe CMD check --force-multiarch --install=check:debrowser.install-out.txt --library=C:\Users\biocbuild\bbs-3.13-bioc\R\library --no-vignettes --timings debrowser_1.20.1.tar.gz |
| StartedAt: 2021-10-14 21:57:42 -0400 (Thu, 14 Oct 2021) |
| EndedAt: 2021-10-14 22:07:12 -0400 (Thu, 14 Oct 2021) |
| EllapsedTime: 569.7 seconds |
| RetCode: 0 |
| Status: OK |
| CheckDir: debrowser.Rcheck |
| Warnings: 0 |
############################################################################## ############################################################################## ### ### Running command: ### ### C:\Users\biocbuild\bbs-3.13-bioc\R\bin\R.exe CMD check --force-multiarch --install=check:debrowser.install-out.txt --library=C:\Users\biocbuild\bbs-3.13-bioc\R\library --no-vignettes --timings debrowser_1.20.1.tar.gz ### ############################################################################## ############################################################################## * using log directory 'C:/Users/biocbuild/bbs-3.13-bioc/meat/debrowser.Rcheck' * using R version 4.1.1 (2021-08-10) * using platform: x86_64-w64-mingw32 (64-bit) * using session charset: ISO8859-1 * using option '--no-vignettes' * checking for file 'debrowser/DESCRIPTION' ... OK * checking extension type ... Package * this is package 'debrowser' version '1.20.1' * package encoding: UTF-8 * checking package namespace information ... OK * checking package dependencies ... OK * checking if this is a source package ... OK * checking if there is a namespace ... OK * checking for hidden files and directories ... OK * checking for portable file names ... OK * checking whether package 'debrowser' can be installed ... OK * checking installed package size ... OK * checking package directory ... OK * checking 'build' directory ... OK * checking DESCRIPTION meta-information ... OK * checking top-level files ... OK * checking for left-over files ... OK * checking index information ... OK * checking package subdirectories ... OK * checking R files for non-ASCII characters ... OK * checking R files for syntax errors ... OK * loading checks for arch 'i386' ** checking whether the package can be loaded ... OK ** checking whether the package can be loaded with stated dependencies ... OK ** checking whether the package can be unloaded cleanly ... OK ** checking whether the namespace can be loaded with stated dependencies ... OK ** checking whether the namespace can be unloaded cleanly ... OK * loading checks for arch 'x64' ** checking whether the package can be loaded ... OK ** checking whether the package can be loaded with stated dependencies ... OK ** checking whether the package can be unloaded cleanly ... OK ** checking whether the namespace can be loaded with stated dependencies ... OK ** checking whether the namespace can be unloaded cleanly ... OK * checking dependencies in R code ... OK * checking S3 generic/method consistency ... OK * checking replacement functions ... OK * checking foreign function calls ... OK * checking R code for possible problems ... NOTE checkCountData : <anonymous>: no visible binding for global variable 'err' debrowserdataload: no visible binding for global variable 'demodata' debrowserhistogram: no visible global function definition for 'config' getBarMainPlot: no visible global function definition for 'config' getBoxMainPlot: no visible global function definition for 'config' getDensityPlot: no visible binding for global variable 'samples' getDensityPlot: no visible global function definition for 'config' getGOPlots: no visible global function definition for 'facet_grid' getIQRPlot: no visible global function definition for 'config' mainScatterNew: no visible global function definition for 'config' plot_pca: no visible binding for global variable 'x' plot_pca: no visible binding for global variable 'y' plot_pca: no visible binding for global variable 'samples' plot_pca: no visible global function definition for 'config' runHeatmap: no visible global function definition for 'config' Undefined global functions or variables: config demodata err facet_grid samples x y * checking Rd files ... OK * checking Rd metadata ... OK * checking Rd cross-references ... OK * checking for missing documentation entries ... OK * checking for code/documentation mismatches ... OK * checking Rd \usage sections ... OK * checking Rd contents ... OK * checking for unstated dependencies in examples ... OK * checking files in 'vignettes' ... OK * checking examples ... ** running examples for arch 'i386' ... OK ** running examples for arch 'x64' ... OK * checking for unstated dependencies in 'tests' ... OK * checking tests ... ** running tests for arch 'i386' ... Running 'test-demo.R' Running 'test-deseq.R' Running 'test-null.R' Running 'test-ui.R' OK ** running tests for arch 'x64' ... Running 'test-demo.R' Running 'test-deseq.R' Running 'test-null.R' Running 'test-ui.R' OK * checking for unstated dependencies in vignettes ... OK * checking package vignettes in 'inst/doc' ... OK * checking running R code from vignettes ... SKIPPED * checking re-building of vignette outputs ... SKIPPED * checking PDF version of manual ... OK * DONE Status: 1 NOTE See 'C:/Users/biocbuild/bbs-3.13-bioc/meat/debrowser.Rcheck/00check.log' for details.
debrowser.Rcheck/00install.out
##############################################################################
##############################################################################
###
### Running command:
###
### C:\cygwin\bin\curl.exe -O http://155.52.207.165/BBS/3.13/bioc/src/contrib/debrowser_1.20.1.tar.gz && rm -rf debrowser.buildbin-libdir && mkdir debrowser.buildbin-libdir && C:\Users\biocbuild\bbs-3.13-bioc\R\bin\R.exe CMD INSTALL --merge-multiarch --build --library=debrowser.buildbin-libdir debrowser_1.20.1.tar.gz && C:\Users\biocbuild\bbs-3.13-bioc\R\bin\R.exe CMD INSTALL debrowser_1.20.1.zip && rm debrowser_1.20.1.tar.gz debrowser_1.20.1.zip
###
##############################################################################
##############################################################################
% Total % Received % Xferd Average Speed Time Time Time Current
Dload Upload Total Spent Left Speed
0 0 0 0 0 0 0 0 --:--:-- --:--:-- --:--:-- 0
53 2472k 53 1312k 0 0 2105k 0 0:00:01 --:--:-- 0:00:01 2107k
100 2472k 100 2472k 0 0 2685k 0 --:--:-- --:--:-- --:--:-- 2684k
install for i386
* installing *source* package 'debrowser' ...
** using staged installation
** R
** inst
** byte-compile and prepare package for lazy loading
** help
*** installing help indices
converting help for package 'debrowser'
finding HTML links ... done
BoxMainPlotControlsUI html
IQRPlotControlsUI html
actionButtonDE html
addDataCols html
addID html
all2all html
all2allControlsUI html
applyFilters html
applyFiltersNew html
applyFiltersToMergedComparison html
barMainPlotControlsUI html
batchEffectUI html
batchMethod html
changeClusterOrder html
checkCountData html
checkMetaData html
clustFunParamsUI html
clusterData html
compareClust html
condSelectUI html
correctCombat html
correctHarman html
customColorsUI html
cutOffSelectionUI html
dataLCFUI html
dataLoadUI html
deServer html
deUI html
debrowserIQRplot html
debrowserall2all html
debrowserbarmainplot html
debrowserbatcheffect html
debrowserboxmainplot html
debrowsercondselect html
debrowserdataload html
debrowserdeanalysis html
debrowserdensityplot html
debrowserheatmap html
debrowserhistogram html
debrowserlowcountfilter html
debrowsermainplot html
debrowserpcaplot html
dendControlsUI html
densityPlotControlsUI html
distFunParamsUI html
drawKEGG html
drawPCAExplained html
fileTypes html
fileUploadBox html
generateTestData html
getAfterLoadMsg html
getAll2AllPlotUI html
getBSTableUI html
getBarMainPlot html
getBarMainPlotUI html
getBoxMainPlot html
getBoxMainPlotUI html
getColorShapeSelection html
getColors html
getCompSelection html
getCondMsg html
getConditionSelector html
getConditionSelectorFromMeta html
getCutOffSelection html
getDEAnalysisText html
getDEResultsUI html
getDataAssesmentText html
getDataForTables html
getDataPreparationText html
getDensityPlot html
getDensityPlotUI html
getDomains html
getDown html
getDownloadSection html
getEnrichDO html
getEnrichGO html
getEnrichKEGG html
getEntrezIds html
getEntrezTable html
getGOLeftMenu html
getGOPlots html
getGSEA html
getGeneList html
getGeneSetData html
getGoPanel html
getHeatmapUI html
getHelpButton html
getHideLegendOnOff html
getHistogramUI html
getIQRPlot html
getIQRPlotUI html
getIntroText html
getJSLine html
getKEGGModal html
getLeftMenu html
getLegendColors html
getLegendRadio html
getLegendSelect html
getLevelOrder html
getLoadingMsg html
getLogo html
getMainPanel html
getMainPlotUI html
getMainPlotsLeftMenu html
getMean html
getMergedComparison html
getMetaSelector html
getMethodDetails html
getMostVariedList html
getNormalizedMatrix html
getOrganism html
getOrganismBox html
getOrganismPathway html
getPCAPlotUI html
getPCAcontolUpdatesJS html
getPCAexplained html
getPCselection html
getPlotArea html
getProgramTitle html
getQAText html
getQCLeftMenu html
getQCPanel html
getSampleDetails html
getSampleNames html
getSamples html
getSearchData html
getSelHeat html
getSelectInputBox html
getSelectedCols html
getSelectedDatasetInput html
getShapeColor html
getStartPlotsMsg html
getStartupMsg html
getTabUpdateJS html
getTableDetails html
getTableModal html
getTableStyle html
getTextOnOff html
getUp html
getUpDown html
getVariationData html
get_conditions_given_selection html
heatmapControlsUI html
heatmapJScode html
heatmapServer html
heatmapUI html
hideObj html
histogramControlsUI html
installpack html
kmeansControlsUI html
lcfMetRadio html
loadpack html
mainPlotControlsUI html
mainScatterNew html
niceKmeans html
normalizationMethods html
palUI html
panel.cor html
panel.hist html
pcaPlotControlsUI html
plotData html
plotMarginsUI html
plotSizeMarginsUI html
plotSizeUI html
plotTypeUI html
plot_pca html
prepDEOutput html
prepDataContainer html
prepGroup html
prepHeatData html
prepPCADat html
push html
removeCols html
removeExtraCols html
round_vals html
runDE html
runDESeq2 html
runEdgeR html
runHeatmap html
runHeatmap2 html
runLimma html
run_pca html
selectConditions html
selectGroupInfo html
selectedInput html
sepRadio html
setBatch html
showObj html
startDEBrowser html
startHeatmap html
textareaInput html
togglePanels html
** building package indices
** installing vignettes
** testing if installed package can be loaded from temporary location
** testing if installed package can be loaded from final location
** testing if installed package keeps a record of temporary installation path
install for x64
* installing *source* package 'debrowser' ...
** testing if installed package can be loaded
* MD5 sums
packaged installation of 'debrowser' as debrowser_1.20.1.zip
* DONE (debrowser)
* installing to library 'C:/Users/biocbuild/bbs-3.13-bioc/R/library'
package 'debrowser' successfully unpacked and MD5 sums checked
|
debrowser.Rcheck/tests_i386/test-demo.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: i386-w64-mingw32/i386 (32-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> require(shiny)
Loading required package: shiny
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> test_that("demo data can be loaded", {
+ load(system.file("extdata", "demo", "demodata.Rda",
+ package = "debrowser"))
+ expect_true(is.data.frame(demodata))
+ expect_equal(demodata[29311, 2], 2)
+ expect_equal(demodata[29311, 5], 7.1)
+ expect_equal(demodata[29311, 6], 6)
+ expect_null(demodata[1, 7])
+ })
Test passed
>
> proc.time()
user system elapsed
14.79 1.56 16.34
|
debrowser.Rcheck/tests_x64/test-demo.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> require(shiny)
Loading required package: shiny
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> test_that("demo data can be loaded", {
+ load(system.file("extdata", "demo", "demodata.Rda",
+ package = "debrowser"))
+ expect_true(is.data.frame(demodata))
+ expect_equal(demodata[29311, 2], 2)
+ expect_equal(demodata[29311, 5], 7.1)
+ expect_equal(demodata[29311, 6], 6)
+ expect_null(demodata[1, 7])
+ })
Test passed
>
> proc.time()
user system elapsed
13.29 0.81 14.09
|
|
debrowser.Rcheck/tests_i386/test-deseq.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: i386-w64-mingw32/i386 (32-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> load(system.file("extdata", "demo", "demodata.Rda",
+ package = "debrowser"))
> columns <- c("exper_rep1", "exper_rep2", "exper_rep3",
+ "control_rep1", "control_rep2", "control_rep3")
> conds <- factor( c("Control", "Control", "Control",
+ "Treat", "Treat", "Treat") )
> data <- data.frame(demodata[, columns])
>
> #Run DESeq2 with the following parameters
> params <- c("DESeq2", "parametric", F, "Wald", "None")
> non_expressed_cutoff <- 10
> data <- subset(data, rowSums(data) > 10)
> test_that("Able to run DESeq2", {
+ deseqrun <- runDE(data, columns, conds, params)
+ expect_true(exists("deseqrun"))
+ })
Test passed
>
> ##################################################
> deseqrun <- runDE(data, columns, conds, params)
estimating size factors
estimating dispersions
gene-wise dispersion estimates
mean-dispersion relationship
final dispersion estimates
fitting model and testing
>
> de_res <- data.frame(deseqrun)
> norm_data <- getNormalizedMatrix(data[, columns])
> rdata <- cbind(rownames(de_res), norm_data[rownames(de_res), columns],
+ log10(rowMeans(norm_data[rownames(de_res),
+ paste(c("exper_rep1", "exper_rep2", "exper_rep3"))])
+ + 0.1), log10( rowMeans( norm_data[ rownames( de_res ),
+ paste(c("control_rep1", "control_rep2", "control_rep3"))])
+ + 0.1), de_res[rownames(de_res),
+ c("padj", "log2FoldChange")], 2 ^ de_res[rownames(de_res),
+ "log2FoldChange"], -1 *
+ log10(de_res[rownames(de_res), "padj"]))
> colnames(rdata) <- c("ID", columns, "Cond1", "Cond2", "padj",
+ "log2FoldChange", "foldChange", "log10padj")
> rdata <- as.data.frame(rdata)
> rdata$padj[is.na(rdata$padj)] <- 1
>
> padj_cutoff <- 0.01
> foldChange_cutoff <- 2
>
> rdata$Legend <- character(nrow(rdata))
> rdata$Legend[rdata$log2FoldChange > log2(foldChange_cutoff) &
+ rdata$padj < padj_cutoff] <- "Up"
> rdata$Legend[rdata$log2FoldChange < log2(1 / foldChange_cutoff) &
+ rdata$padj < padj_cutoff] <- "Down"
> rdata$Legend[abs(rdata$log2FoldChange) <=
+ log2(foldChange_cutoff)] <- "NS"
> rdata$Legend[is.null(rdata$log10padj)] <- "NA"
> rdata$Size <- character(nrow(rdata))
> rdata[, "Size"] <- "40"
>
> dat <- rdata
> dat$M <- rdata$Cond1 - rdata$Cond2
> dat$A <- (rdata$Cond1 + rdata$Cond2) / 2
>
> updown <- rdata[rdata$Legend=="Up" | rdata$Legend=="Down",columns]
> ##################################################
>
> test_that("Check the QC plots", {
+ expect_silent( all2all(data) )
+ })
Test passed
>
>
> proc.time()
user system elapsed
37.59 2.04 39.62
|
debrowser.Rcheck/tests_x64/test-deseq.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> load(system.file("extdata", "demo", "demodata.Rda",
+ package = "debrowser"))
> columns <- c("exper_rep1", "exper_rep2", "exper_rep3",
+ "control_rep1", "control_rep2", "control_rep3")
> conds <- factor( c("Control", "Control", "Control",
+ "Treat", "Treat", "Treat") )
> data <- data.frame(demodata[, columns])
>
> #Run DESeq2 with the following parameters
> params <- c("DESeq2", "parametric", F, "Wald", "None")
> non_expressed_cutoff <- 10
> data <- subset(data, rowSums(data) > 10)
> test_that("Able to run DESeq2", {
+ deseqrun <- runDE(data, columns, conds, params)
+ expect_true(exists("deseqrun"))
+ })
Test passed
>
> ##################################################
> deseqrun <- runDE(data, columns, conds, params)
estimating size factors
estimating dispersions
gene-wise dispersion estimates
mean-dispersion relationship
final dispersion estimates
fitting model and testing
>
> de_res <- data.frame(deseqrun)
> norm_data <- getNormalizedMatrix(data[, columns])
> rdata <- cbind(rownames(de_res), norm_data[rownames(de_res), columns],
+ log10(rowMeans(norm_data[rownames(de_res),
+ paste(c("exper_rep1", "exper_rep2", "exper_rep3"))])
+ + 0.1), log10( rowMeans( norm_data[ rownames( de_res ),
+ paste(c("control_rep1", "control_rep2", "control_rep3"))])
+ + 0.1), de_res[rownames(de_res),
+ c("padj", "log2FoldChange")], 2 ^ de_res[rownames(de_res),
+ "log2FoldChange"], -1 *
+ log10(de_res[rownames(de_res), "padj"]))
> colnames(rdata) <- c("ID", columns, "Cond1", "Cond2", "padj",
+ "log2FoldChange", "foldChange", "log10padj")
> rdata <- as.data.frame(rdata)
> rdata$padj[is.na(rdata$padj)] <- 1
>
> padj_cutoff <- 0.01
> foldChange_cutoff <- 2
>
> rdata$Legend <- character(nrow(rdata))
> rdata$Legend[rdata$log2FoldChange > log2(foldChange_cutoff) &
+ rdata$padj < padj_cutoff] <- "Up"
> rdata$Legend[rdata$log2FoldChange < log2(1 / foldChange_cutoff) &
+ rdata$padj < padj_cutoff] <- "Down"
> rdata$Legend[abs(rdata$log2FoldChange) <=
+ log2(foldChange_cutoff)] <- "NS"
> rdata$Legend[is.null(rdata$log10padj)] <- "NA"
> rdata$Size <- character(nrow(rdata))
> rdata[, "Size"] <- "40"
>
> dat <- rdata
> dat$M <- rdata$Cond1 - rdata$Cond2
> dat$A <- (rdata$Cond1 + rdata$Cond2) / 2
>
> updown <- rdata[rdata$Legend=="Up" | rdata$Legend=="Down",columns]
> ##################################################
>
> test_that("Check the QC plots", {
+ expect_silent( all2all(data) )
+ })
Test passed
>
>
> proc.time()
user system elapsed
40.39 0.85 41.21
|
|
debrowser.Rcheck/tests_i386/test-null.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: i386-w64-mingw32/i386 (32-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> require(shiny)
Loading required package: shiny
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> test_that("passing no data returns NULL", {
+ expect_null(compareClust() )
+ expect_null(getGOPlots(NULL, NULL))
+ null_deseq <- runDE(NULL)
+ expect_null(null_deseq)
+ expect_null(plot_pca(NULL))
+ })
Test passed
>
> proc.time()
user system elapsed
11.62 1.51 13.12
|
debrowser.Rcheck/tests_x64/test-null.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> require(shiny)
Loading required package: shiny
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> test_that("passing no data returns NULL", {
+ expect_null(compareClust() )
+ expect_null(getGOPlots(NULL, NULL))
+ null_deseq <- runDE(NULL)
+ expect_null(null_deseq)
+ expect_null(plot_pca(NULL))
+ })
Test passed
>
> proc.time()
user system elapsed
12.76 0.65 13.40
|
|
debrowser.Rcheck/tests_i386/test-ui.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: i386-w64-mingw32/i386 (32-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> require(shiny)
Loading required package: shiny
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> test_that("able to create panel UI", {
+ expect_silent( QCPanel <- getQCPanel() )
+ expect_true(exists("QCPanel"))
+ expect_equal(QCPanel[[1]][[1]], "div")
+
+ expect_silent( downloads <- getDownloadSection() )
+ expect_true(exists("downloads"))
+ expect_equal(downloads[[1]][[1]], "div")
+
+ expect_silent( getMain <- getMainPanel() )
+ expect_true(exists("getMain"))
+ expect_equal(getMain[[1]][[1]], "div")
+
+ expect_silent( getStart <- getStartupMsg() )
+ expect_true(exists("getStart"))
+ expect_equal(getStart[[1]][[1]], "div")
+
+ expect_silent( getAfter <- getAfterLoadMsg() )
+ expect_true(exists("getAfter"))
+ expect_equal(getAfter[[1]][[1]], "div")
+
+ expect_silent(getGO <- getGoPanel() )
+ expect_true(exists("getGO"))
+ expect_equal(getGO[[1]][[1]], "div")
+ })
Test passed
>
> proc.time()
user system elapsed
13.87 1.25 15.11
|
debrowser.Rcheck/tests_x64/test-ui.Rout
R version 4.1.1 (2021-08-10) -- "Kick Things"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> require(shiny)
Loading required package: shiny
> library(debrowser)
##############################################################################
Pathview is an open source software package distributed under GNU General
Public License version 3 (GPLv3). Details of GPLv3 is available at
http://www.gnu.org/licenses/gpl-3.0.html. Particullary, users are required to
formally cite the original Pathview paper (not just mention it) in publications
or products. For details, do citation("pathview") within R.
The pathview downloads and uses KEGG data. Non-academic uses may require a KEGG
license agreement (details at http://www.kegg.jp/kegg/legal.html).
##############################################################################
DEBrowser v1.20.1 For help: https://debrowser.readthedocs.org/
If you use DEBrowser in published research, please cite:
Alper Kucukural, Onur Yukselen, Deniz M. Ozata, Melissa J. Moore, Manuel Garber
DEBrowser: Interactive Differential Expression Analysis and Visualization Tool for Count Data
BMC Genomics 2019 20:6
doi:0.1186/s12864-018-5362-x
> library(testthat)
>
> test_that("able to create panel UI", {
+ expect_silent( QCPanel <- getQCPanel() )
+ expect_true(exists("QCPanel"))
+ expect_equal(QCPanel[[1]][[1]], "div")
+
+ expect_silent( downloads <- getDownloadSection() )
+ expect_true(exists("downloads"))
+ expect_equal(downloads[[1]][[1]], "div")
+
+ expect_silent( getMain <- getMainPanel() )
+ expect_true(exists("getMain"))
+ expect_equal(getMain[[1]][[1]], "div")
+
+ expect_silent( getStart <- getStartupMsg() )
+ expect_true(exists("getStart"))
+ expect_equal(getStart[[1]][[1]], "div")
+
+ expect_silent( getAfter <- getAfterLoadMsg() )
+ expect_true(exists("getAfter"))
+ expect_equal(getAfter[[1]][[1]], "div")
+
+ expect_silent(getGO <- getGoPanel() )
+ expect_true(exists("getGO"))
+ expect_equal(getGO[[1]][[1]], "div")
+ })
Test passed
>
> proc.time()
user system elapsed
11.48 0.79 12.25
|
|
debrowser.Rcheck/examples_i386/debrowser-Ex.timings
|
debrowser.Rcheck/examples_x64/debrowser-Ex.timings
|