From 19c26a82e4ac13a09b3959740d97e042759879de Mon Sep 17 00:00:00 2001 From: Dirk Eddelbuettel Date: Fri, 26 Nov 2021 22:46:50 +0100 Subject: [PATCH] call two seq() explicitly as Rcpp::seq() --- src/_g_mcsMAT2.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/_g_mcsMAT2.cpp b/src/_g_mcsMAT2.cpp index da3d282..b7c175d 100755 --- a/src/_g_mcsMAT2.cpp +++ b/src/_g_mcsMAT2.cpp @@ -250,13 +250,13 @@ SEXP mcsMAT0_ ( SEXP XX_, SEXP mcs0idx_){ case INTSXP : case REALSXP : { NumericMatrix X(as(XX_)); - if (zz_.isNULL()) mcs0idx = seq(0, X.ncol()-1); + if (zz_.isNULL()) mcs0idx = Rcpp::seq(0, X.ncol()-1); else mcs0idx = mcs0idx_; return do_mcs_dense ( X, mcs0idx ); } case S4SXP : { MSpMat X(as(XX_)); - if (zz_.isNULL()) mcs0idx = seq(0, X.cols()-1); + if (zz_.isNULL()) mcs0idx = Rcpp::seq(0, X.cols()-1); else mcs0idx = mcs0idx_; return do_mcs_sparse( X, mcs0idx ); }