Displaying 1 result from an estimated 1 matches for "mysg".
Did you mean:
msg
2006 Jan 10
3
Issue with c++ .C call
...uit R.
Reading symbols for shared libraries
............................................................. done
Reading symbols for shared libraries . done
Reading symbols for shared libraries . done
> dyn.load('StepGram/src/Stepgram.so')
Reading symbols for shared libraries .. done
> mySG <- function(dat1,thresh,noise) {
vec <- c(thresh,noise)
.C('calcStepgram',
data=as.double(dat1),
prm=as.double(vec),
intervals=double(10000*3+1),
max=as.integer(10000),
n=as.integer(length(dat1)),
plot=double(length(dat1)))}
> dat <- c(0.01,0.1,...