Calling a LAPACK subroutine from R

On 12 Sep 2019, at 10:36, Serguei Sokol <sokol at insa-toulouse.fr> wrote:

On 11/09/2019 21:38, Berend Hasselman wrote:

The Lapack library is loaded automatically by R itself when it needs it  for doing some calculation.
You can force it to do that with a (dummy) solve for example.
Put this at start of your script:

<code>
# dummy code to get LAPACK library loaded
X1 <- diag(2,2)
x1 <- rep(2,2)
# X1;x1
z <- solve(X1,x1)
</code>

another way is to use directly dyn.load():

lapack.path <- paste0(file.path(R.home(), ifelse(.Platform$OS.type == "windows",
         file.path("bin", .Platform$r_arch, "Rlapack"), file.path("lib", "libRlapack"))),
         .Platform$dynlib.ext)
dyn.load(lapack.path)