search for: testfunc2

I've got a c function in a dll and have been able to call it from R. The function is : void __stdcall testfunc2( unsigned long *a, double *b, unsigned long *c, double *result ) { *result = 0; *result = (*a) * (*b) * (*c); } and the R code to call the function is as follows: dyn.load("c:/openfvs/biometrics/debug/biometrics.dll" ) tf2 <- function( a, b, c, d ) .C...

Hello! I have the problem that in my function the passed variable is not used, but the variable name of the dataframe itself?- difficult to explain, but an easy example: TestFunc<-function(df, group) { ??? print(names(subset(df, select=group))) } df1<-data.frame(group="G1", visit="V1", value=0.9) TestFunc(df1, c("group", "visit")) Result: [1]

Hi, I am interested in generating two different optimized versions of a function into a single binary, so that I can dynamically select the function to execute at runtime. Can anyone shed some insight into the difficulties in achieving this in the LLVM infrastructure? Thank you! vj. -------------- next part -------------- An HTML attachment was scrubbed... URL:

Is it possible to call a basic function/subroutine in a DLL/shared lib from within R without having to build an R package? I have a function like: void __stdcall testfunc2( unsigned long a, double b, unsigned long c ) { return a * b * c; } or=20 subroutine fortran_2002_bh_age (sp,site,total_age,bh_age) integer*2 sp real*4 site=20 real*4 total_age integer*2 bh_age real*4 x bh_age =3D some_value end subroutine I have been able to...

Hello Group, I'm trying to learn R and am having a problem getting output from a function I'm trying to write. The problem is clearly one of scope, but I can't find the documentation that tells me how to get around the issue. Here is an example of my problem. testfunc<-function(x) { y<-10 print(y) print(x) } testfunc(4) The variables x and y are accessible during execution

...bjects. My code so far looks something like: /* this function will perform the same tasks as the previous */ /* and return a list of the values rather than just the */ /* optimal values. It should return the optimization info as */ /* well as the residual values from the flikam function */ SEXP testfunc2( SEXP *pq, SEXP *obs ) { int i; double *pq_vect; double *obs_vect; SEXP ret_val; PROTECT( pq = coerceVector( pq, REALSXP ) ); PROTECT( obs = coerceVector( obs, REALSXP ) ); pq_vect = REAL( pq ); obs_vect = REAL( obs ); /* call my functions for the results */...

...bjects. My code so far looks something like: /* this function will perform the same tasks as the previous */ /* and return a list of the values rather than just the */ /* optimal values. It should return the optimization info as */ /* well as the residual values from the flikam function */ SEXP testfunc2( SEXP *pq, SEXP *obs ) { int i; double *pq_vect; double *obs_vect; SEXP ret_val; PROTECT( pq = coerceVector( pq, REALSXP ) ); PROTECT( obs = coerceVector( obs, REALSXP ) ); pq_vect = REAL( pq ); obs_vect = REAL( obs ); /* call my functions for the results */...

Hello LLVM community, For testing IR passes, LLVM currently has two kinds of tests: 1. regression tests (in llvm/test); .ll files invoking opt, and matching its text output using FileCheck. 2. unittests (in llvm/unittests); Google tests containing the IR as a string, constructing a pass pipeline, and inspecting the output using code. I propose to add an additional kind of test, which I call