johrpan/geposan
1
0
Fork 0
mirror of https://github.com/johrpan/geposan.git synced 2025-10-26 10:47:25 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Use inherits() for class checking

Browse source
This commit is contained in:
Elias Projahn 2021-12-13 09:50:45 +01:00
parent 207fc753a7
commit d98c70a205
4 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
R/comparison.R
View file

@ -18,7 +18,7 @@
#'
#' @export
compare <- function(ranking, comparison_gene_ids) {
if (!"geposan_ranking" %chin% class(ranking)) {
if (!inherits(ranking, "geposan_ranking")) {
stop("Invalid ranking. Use geposan::ranking().")
}