test scenario when input matrix has rows with only zeros

Author: dselivanov

tests/testthat.R

@@ -8,3 +8,9 @@ logger = lgr::get_logger('rsparse')
 logger$set_threshold('warn')
 data("movielens100k")
 test_check("rsparse")
+
+movielens100k = rbind(
+  movielens100k,
+  as(matrix(0, nrow = 2, ncol = ncol(movielens100k)), 'sparseMatrix'),
+  movielens100k[1:2, ]
+)