This page was generated on 2021-05-06 12:28:54 -0400 (Thu, 06 May 2021).
R version 4.0.5 (2021-03-31) -- "Shake and Throw"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (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.
> # Adapted from: http://rwiki.sciviews.org/doku.php?id=developers:runit
>
> if( identical( .Platform$OS.type, "windows" ) &&
+ identical( .Platform$r_arch, "x64" ) ){
+ print( "unit tests not run on windows 64 (workaround alert)" )
+ } else {
+ if(require("RUnit", quietly = TRUE)) {
+ pkg <- "rqt"
+ if(Sys.getenv("RCMDCHECK") == "FALSE") {
+ path <- file.path(getwd(), "..", "inst", "unitTests")
+ } else {
+ path <- system.file(package=pkg, "unitTests")
+ }
+
+ cat("\nRunning unit tests:\n")
+ print(list(pkg=pkg, getwd=getwd(), pathToUnitTests=path))
+
+ library(package=pkg, character.only=TRUE)
+
+ # Define tests
+ testSuite <- defineTestSuite(name=paste(pkg, "unit testing"),
+ dirs=path,
+ testFuncRegexp = "^test_+",
+ testFileRegexp = "^test_+")
+
+ # Run
+ tests <- runTestSuite(testSuite)
+
+ # Default report name
+ pathReport <- file.path(path, "report")
+
+ # Report to stdout
+ printTextProtocol(tests, showDetails=FALSE)
+
+ # Return stop() to cause R CMD check stop in case of
+ # - failures i.e. FALSE to unit tests or
+ # - errors i.e. R errors
+ tmp <- getErrors(tests)
+ if(tmp$nFail > 0 | tmp$nErr > 0) {
+ stop(paste("\n\nUnit testing failed (#test failures: ", tmp$nFail, ",
+ #R errors: ", tmp$nErr, ")\n\n", sep=""))
+ }
+
+ } else {
+ print( "package RUnit not available, cannot run unit tests" )
+ }
+ }
Running unit tests:
$pkg
[1] "rqt"
$getwd
[1] "/home/biocbuild/bbs-3.12-bioc/meat/rqt.Rcheck/tests"
$pathToUnitTests
[1] "/home/biocbuild/bbs-3.12-bioc/R/library/rqt/unitTests"
Loading required package: SummarizedExperiment
Loading required package: MatrixGenerics
Loading required package: matrixStats
Attaching package: 'MatrixGenerics'
The following objects are masked from 'package:matrixStats':
colAlls, colAnyNAs, colAnys, colAvgsPerRowSet, colCollapse,
colCounts, colCummaxs, colCummins, colCumprods, colCumsums,
colDiffs, colIQRDiffs, colIQRs, colLogSumExps, colMadDiffs,
colMads, colMaxs, colMeans2, colMedians, colMins, colOrderStats,
colProds, colQuantiles, colRanges, colRanks, colSdDiffs, colSds,
colSums2, colTabulates, colVarDiffs, colVars, colWeightedMads,
colWeightedMeans, colWeightedMedians, colWeightedSds,
colWeightedVars, rowAlls, rowAnyNAs, rowAnys, rowAvgsPerColSet,
rowCollapse, rowCounts, rowCummaxs, rowCummins, rowCumprods,
rowCumsums, rowDiffs, rowIQRDiffs, rowIQRs, rowLogSumExps,
rowMadDiffs, rowMads, rowMaxs, rowMeans2, rowMedians, rowMins,
rowOrderStats, rowProds, rowQuantiles, rowRanges, rowRanks,
rowSdDiffs, rowSds, rowSums2, rowTabulates, rowVarDiffs, rowVars,
rowWeightedMads, rowWeightedMeans, rowWeightedMedians,
rowWeightedSds, rowWeightedVars
Loading required package: GenomicRanges
Loading required package: stats4
Loading required package: BiocGenerics
Loading required package: parallel
Attaching package: 'BiocGenerics'
The following objects are masked from 'package:parallel':
clusterApply, clusterApplyLB, clusterCall, clusterEvalQ,
clusterExport, clusterMap, parApply, parCapply, parLapply,
parLapplyLB, parRapply, parSapply, parSapplyLB
The following objects are masked from 'package:stats':
IQR, mad, sd, var, xtabs
The following objects are masked from 'package:base':
Filter, Find, Map, Position, Reduce, anyDuplicated, append,
as.data.frame, basename, cbind, colnames, dirname, do.call,
duplicated, eval, evalq, get, grep, grepl, intersect, is.unsorted,
lapply, mapply, match, mget, order, paste, pmax, pmax.int, pmin,
pmin.int, rank, rbind, rownames, sapply, setdiff, sort, table,
tapply, union, unique, unsplit, which.max, which.min
Loading required package: S4Vectors
Attaching package: 'S4Vectors'
The following object is masked from 'package:base':
expand.grid
Loading required package: IRanges
Loading required package: GenomeInfoDb
Loading required package: Biobase
Welcome to Bioconductor
Vignettes contain introductory material; view with
'browseVignettes()'. To cite Bioconductor, see
'citation("Biobase")', and for packages 'citation("pkgname")'.
Attaching package: 'Biobase'
The following object is masked from 'package:MatrixGenerics':
rowMedians
The following objects are masked from 'package:matrixStats':
anyMissing, rowMedians
Executing test function test_geneTest ... done successfully.
Executing test function test_geneTestMeta ... done successfully.
RUNIT TEST PROTOCOL -- Thu May 6 05:33:15 2021
***********************************************
Number of test functions: 2
Number of errors: 0
Number of failures: 0
1 Test Suite :
rqt unit testing - 2 test functions, 0 errors, 0 failures
>
> proc.time()
user system elapsed
8.552 0.284 8.893