Rf_ScalarInteger: Rf_ScalarInteger
In ramiromagno/c3po: From C to R and back again

Description Arguments Value Declaration Definition Examples

\Sexpr[results=rd, stage=render]{c3po:::badge('fnp')} \Sexpr[results=rd, stage=render]{c3po:::badge('c2r')} \Sexpr[results=rd, stage=render]{c3po:::badge('prot')}

Converts an int x to a SEXP object that represents an R length one integer vector.

`x`	an int value.

A SEXP object, namely a length one integer vector.

1	SEXP Rf_ScalarInteger(int x);

In Rinternals.h.

INLINE_FUN SEXP ScalarInteger(int x)
{
  SEXP ans = allocVector(INTSXP, 1);
  SET_SCALAR_IVAL(ans, x);
  return ans;
}

In Rinlinedfuns.h.

# Convert a C int number as an R length one integer vector
forty_two <- inline::cfunction(NULL,
 ' int x = 42;
   SEXP y;
   y = PROTECT(Rf_ScalarInteger(x));
   UNPROTECT(1);
   return y;
 ')
forty_two()