CODEWITHSUNDEEP
rrcpp
David
David

Reputation: 10182

Rcpp with embedded R code, show no output of R code

I have a cpp file that defines c++ and R functions, which are sourced into R using Rcpp::sourceCpp().

When I source the file, the R code is (partially) printed as well, even when I specify showOutput = FALSE (I guess it only applies to cpp code?!).

The question now is: how can I suppress the partial R output without using capture.output() or similar tricks.

MWE

in tester.cpp

#include <Rcpp.h>
// [[Rcpp::export]]
Rcpp::NumericVector timesTwo(Rcpp::NumericVector x) {
  return x * 2;
}
/*** R
foo <- function(x) timesTwo(x)
*/

When sourcing the file, I see the following:

Rcpp::sourceCpp("tester.cpp", showOutput = FALSE)
#> foo <- function(x) timesTwo(x)

Even shorter MWE

Rcpp::sourceCpp(code='
#include <Rcpp.h>
// [[Rcpp::export]]
Rcpp::NumericVector timesTwo(Rcpp::NumericVector x) {
  return x * 2;
}
/*** R
foo <- function(x) timesTwo(x)
*/
')

Upvotes: 1

Views: 197

Answers (1)

Dirk is no longer here
Dirk is no longer here

Reputation: 368261

Could this question be rooted in a misunderstanding of what showOutput is for?

Looking at help(sourceCpp) we see

showOutput: ‘TRUE’ to print ‘R CMD SHLIB’ output to the console.

that it affects the actual compilation step and has nothing to do with any R code added as optional bit to also run if present.

The following example should make this clear (and reveal a few of CXX and other settings):

> cppFunction("int doubleMe(int i) { return i+i; }", showOutput=TRUE)
/usr/lib/R/bin/R CMD SHLIB -o 'sourceCpp_10.so' 'file99f11710553a7.cpp' 
ccache g++ -I"/usr/share/R/include" -DNDEBUG   -I"/usr/local/lib/R/site-library/Rcpp/include" -I"/tmp/RtmpC7dZ23/sourceCpp-x86_64-pc-linux-gnu-1.0.5.4"    -fpic  -g -O3 -Wall -pipe -pedantic  -c file99f11710553a7.cpp -o file99f11710553a7.o
ccache g++ -Wl,-S -shared -L/usr/lib/R/lib -Wl,-Bsymbolic-functions -Wl,-z,relro -o sourceCpp_10.so file99f11710553a7.o -L/usr/lib/R/lib -lR
>
> cppFunction("int trippleMe(int i) { return i+i+i; }", showOutput=FALSE)
>

Now, suppressing output of R code is a different topic and orthogonal to whether such code contains element made via Rcpp or not.

And lastly @MrFlick is spot on that if you don't want R code sourced as part of a sourceCpp() call ... then just don't include such code! Or just break the regexp /*** R.

Upvotes: 1

Related Questions