Re: [R] Use .Call interface

2012-12-06 Thread William Dunlap
project.org [mailto:r-help-boun...@r-project.org] On > Behalf > Of Shangru Li > Sent: Thursday, December 06, 2012 11:36 AM > To: r-help@r-project.org > Subject: [R] Use .Call interface > > Hi > > I've written the following program: > > #include > #include

[R] Use .Call interface

2012-12-06 Thread Shangru Li
Hi I've written the following program: #include #include #include "Projector.h" SEXP Projector2(SEXP L, SEXP G, SEXP W, SEXP xymod, SEXP modif){ int nprot=0; PROTECT(L=AS_NUMERIC(L));nprot++; PROTECT(G=AS_NUMERIC(G));nprot++; PROTECT(W=AS_NUMERIC(W));nprot++; PROTECT(xymod=AS_INTEGER(xymo