This page was generated on 2023-01-02 09:00:50 -0500 (Mon, 02 Jan 2023).
R Under development (unstable) (2022-12-25 r83502 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2022 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("testthat")
> library("scTGIF")
>
> options(testthat.use_colours = FALSE)
>
> test_file("testthat/test_DistalLungEpithelium.R")
══ Testing test_DistalLungEpithelium.R ═════════════════════════════════════════
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 1 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 2 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 3 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 4 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 5 ] Done!
> test_file("testthat/test_TGIFFunctions.R")
══ Testing test_TGIFFunctions.R ════════════════════════════════════════════════
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 1 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 2 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 3 ] Done!
> test_file("testthat/test_convertRowID.R")
══ Testing test_convertRowID.R ═════════════════════════════════════════════════
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
|
| | 0%
|
|================== | 25%
|
|=================================== | 50%
|
|==================================================== | 75%
|
|======================================================================| 100%
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 1 ]
|
| | 0%
|
|================== | 25%
|
|=================================== | 50%
|
|==================================================== | 75%
|
|======================================================================| 100%
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 2 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 3 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 4 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 5 ]
|
| | 0%
|
|============== | 20%
|
|============================ | 40%
|
|========================================== | 60%
|
|======================================================== | 80%
|
|======================================================================| 100%
[ FAIL 1 | WARN 0 | SKIP 0 | PASS 5 ]
|
| | 0%
|
|============== | 20%
|
|============================ | 40%
|
|========================================== | 60%
|
|======================================================== | 80%
|
|======================================================================| 100%
[ FAIL 2 | WARN 0 | SKIP 0 | PASS 5 ]
[ FAIL 2 | WARN 1 | SKIP 0 | PASS 5 ]
[ FAIL 3 | WARN 1 | SKIP 0 | PASS 5 ]
[ FAIL 3 | WARN 2 | SKIP 0 | PASS 5 ]
[ FAIL 3 | WARN 2 | SKIP 0 | PASS 6 ]
[ FAIL 3 | WARN 3 | SKIP 0 | PASS 6 ]
[ FAIL 3 | WARN 3 | SKIP 0 | PASS 7 ]
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
[ FAIL 3 | WARN 3 | SKIP 0 | PASS 8 ]
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
[ FAIL 3 | WARN 3 | SKIP 0 | PASS 9 ]
[ FAIL 3 | WARN 3 | SKIP 0 | PASS 10 ]
[ FAIL 3 | WARN 3 | SKIP 0 | PASS 11 ]
[ FAIL 3 | WARN 3 | SKIP 0 | PASS 12 ]
|
| | 0%
|
|================== | 25%
|
|=================================== | 50%
|
|==================================================== | 75%
|
|======================================================================| 100%
[ FAIL 4 | WARN 3 | SKIP 0 | PASS 12 ]
|
| | 0%
|
|================== | 25%
|
|=================================== | 50%
|
|==================================================== | 75%
|
|======================================================================| 100%
[ FAIL 5 | WARN 3 | SKIP 0 | PASS 12 ]
[ FAIL 5 | WARN 4 | SKIP 0 | PASS 12 ]
[ FAIL 6 | WARN 4 | SKIP 0 | PASS 12 ]
[ FAIL 6 | WARN 5 | SKIP 0 | PASS 12 ]
[ FAIL 6 | WARN 5 | SKIP 0 | PASS 13 ]
[ FAIL 6 | WARN 6 | SKIP 0 | PASS 13 ]
[ FAIL 6 | WARN 6 | SKIP 0 | PASS 14 ]
── Failure ('test_convertRowID.R:48'): (code run outside of `test_that()`) ─────
identical(rownames(out$output), c("3", "2", "4", "7")) is not TRUE
`actual`: FALSE
`expected`: TRUE
── Failure ('test_convertRowID.R:51'): (code run outside of `test_that()`) ─────
identical(rownames(out$output), c("3", "2", "4", "7")) is not TRUE
`actual`: FALSE
`expected`: TRUE
── Warning ('test_convertRowID.R:53'): (code run outside of `test_that()`) ─────
number of items to replace is not a multiple of replacement length
Backtrace:
1. scTGIF::convertRowID(input, rowID, LtoR, "large.mean")
at test_convertRowID.R:53:0
2. scTGIF (local) f(input, rowID, LtoR, score, unique.right)
3. igraph::`E<-`(`*tmp*`, value = `*vtmp*`)
4. igraph:::i_set_edge_attr(...)
── Failure ('test_convertRowID.R:54'): (code run outside of `test_that()`) ─────
identical(rownames(out$output), c("3", "2", "4", "7")) is not TRUE
`actual`: FALSE
`expected`: TRUE
── Warning ('test_convertRowID.R:56'): (code run outside of `test_that()`) ─────
number of items to replace is not a multiple of replacement length
Backtrace:
1. scTGIF::convertRowID(input, rowID, LtoR, "large.var")
at test_convertRowID.R:56:0
2. scTGIF (local) f(input, rowID, LtoR, score, unique.right)
3. igraph::`E<-`(`*tmp*`, value = `*vtmp*`)
4. igraph:::i_set_edge_attr(...)
── Warning ('test_convertRowID.R:59'): (code run outside of `test_that()`) ─────
number of items to replace is not a multiple of replacement length
Backtrace:
1. scTGIF::convertRowID(input, rowID, LtoR, "large.cv2")
at test_convertRowID.R:59:0
2. scTGIF (local) f(input, rowID, LtoR, score, unique.right)
3. igraph::`E<-`(`*tmp*`, value = `*vtmp*`)
4. igraph:::i_set_edge_attr(...)
── Failure ('test_convertRowID.R:112'): (code run outside of `test_that()`) ────
identical(rownames(out$output), c("5", "2", "7")) is not TRUE
`actual`: FALSE
`expected`: TRUE
── Failure ('test_convertRowID.R:115'): (code run outside of `test_that()`) ────
identical(rownames(out$output), c("5", "2", "7")) is not TRUE
`actual`: FALSE
`expected`: TRUE
── Warning ('test_convertRowID.R:117'): (code run outside of `test_that()`) ────
number of items to replace is not a multiple of replacement length
Backtrace:
1. scTGIF::convertRowID(input, rowID, LtoR, "large.mean")
at test_convertRowID.R:117:0
2. scTGIF (local) f(input, rowID, LtoR, score, unique.right)
3. igraph::`E<-`(`*tmp*`, value = `*vtmp*`)
4. igraph:::i_set_edge_attr(...)
── Failure ('test_convertRowID.R:118'): (code run outside of `test_that()`) ────
identical(rownames(out$output), c("5", "2", "7")) is not TRUE
`actual`: FALSE
`expected`: TRUE
── Warning ('test_convertRowID.R:120'): (code run outside of `test_that()`) ────
number of items to replace is not a multiple of replacement length
Backtrace:
1. scTGIF::convertRowID(input, rowID, LtoR, "large.var")
at test_convertRowID.R:120:0
2. scTGIF (local) f(input, rowID, LtoR, score, unique.right)
3. igraph::`E<-`(`*tmp*`, value = `*vtmp*`)
4. igraph:::i_set_edge_attr(...)
── Warning ('test_convertRowID.R:123'): (code run outside of `test_that()`) ────
number of items to replace is not a multiple of replacement length
Backtrace:
1. scTGIF::convertRowID(input, rowID, LtoR, "large.cv2")
at test_convertRowID.R:123:0
2. scTGIF (local) f(input, rowID, LtoR, score, unique.right)
3. igraph::`E<-`(`*tmp*`, value = `*vtmp*`)
4. igraph:::i_set_edge_attr(...)
[ FAIL 6 | WARN 6 | SKIP 0 | PASS 14 ]
> test_file("testthat/test_cellMarkerToGmt.R")
══ Testing test_cellMarkerToGmt.R ══════════════════════════════════════════════
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 1 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 2 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 3 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 0 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 1 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 2 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 3 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 4 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 5 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 6 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 7 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 8 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 9 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 10 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 11 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 12 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 13 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 14 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 15 ]
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 16 ]
── Warning ('test_cellMarkerToGmt.R:134'): (code run outside of `test_that()`) ──
1 record(s) contain duplicate ids: Meniscus
Backtrace:
1. GSEABase::getGmt(outfile2_1)
at test_cellMarkerToGmt.R:134:0
2. GSEABase:::.warningf(...)
── Warning ('test_cellMarkerToGmt.R:135'): (code run outside of `test_that()`) ──
1 record(s) contain duplicate ids: Meniscus
Backtrace:
1. GSEABase::getGmt(outfile2_2)
at test_cellMarkerToGmt.R:135:0
2. GSEABase:::.warningf(...)
── Warning ('test_cellMarkerToGmt.R:140'): (code run outside of `test_that()`) ──
1 record(s) contain duplicate ids: Pancreas
Backtrace:
1. GSEABase::getGmt(outfile3_1)
at test_cellMarkerToGmt.R:140:0
2. GSEABase:::.warningf(...)
── Warning ('test_cellMarkerToGmt.R:141'): (code run outside of `test_that()`) ──
1 record(s) contain duplicate ids: Pancreas
Backtrace:
1. GSEABase::getGmt(outfile3_2)
at test_cellMarkerToGmt.R:141:0
2. GSEABase:::.warningf(...)
[ FAIL 0 | WARN 4 | SKIP 0 | PASS 16 ]
>
> proc.time()
user system elapsed
12.06 1.23 13.40