Manejo de reales en Fortran junto con R
Tengo problemas para manejar reales en Fortran, que uso junto con R. El siguiente código está escrito en Fortran:
Subroutine realtest(lol)
implicit none
Real lol
lol = 10.0
End
Compilo con el comandoR CMD SHLIB realtest.f
. Si ejecuto el objeto compartido en R como:
dyn.load("realtest.so")
res <- .Fortran("realtest",lol= as.numeric(1.2))
El valor resultante delol
es 1.2, pero debería haber sido 10. Si en cambio hago todo con Integers, obtengo el valor correcto 10.