library(cbuild)
```{cbuild, cbuild.includes = "Rdefines.h"} // [[ export() ]] SEXP fn(SEXP x) { double* p_x = NUMERIC_POINTER(x); return Rf_ScalarReal(p_x[0] + 1); }
```r fn(1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.