Displaying 1 result from an estimated 1 matches for "dstebz".
Did you mean:
dst_bo
2007 Apr 11
1
Calling LAPACK functions directly from R
I am interested in tapping into LAPACK functionality directly from R.
Using R-2.4.1 for Windows, I was able to do so ala:
dyn.load("bin/Rlapack.dll")
is.loaded("dstebz") # returns TRUE
N <- 100
NW <- 4
n.tapers <- 5
tpW <- (2 * pi * NW)/N
otNmo <- 1:N
D <- as.double(cos(tpW) * ((N - 1 - 2 * (0:(N - 1)))/2)^2)
E <- as.double((otNmo * (N - otNmo))/2)
z <- .Fortran("dstebz",
"I", "B", as.integer(N), doub...