我装了Rtools，也定义了环境变量，一切显示正常，可是发现调用fortran的时候及其不稳定
我的fortran程序如下
   subroutine MYSUB(n,x)
   
    !DEC$ ATTRIBUTES DLLEXPORT, STDCALL:: MYSUB  
       implicit none
      
       integer:: n,i
       real:: x(n)
      
       do i=1,n
        x(i)=x(i)**2
       end do
      
       end

setwd("d:/R")
system("R CMD SHLIB mysub.f90")
dyn.load("mysub.dll")
is.loaded("mysub")
.C("mysub",as.integer(3),as.numeric(c(2,3,4)))
结果是
[[1]]
[1] 3

[[2]]
[1] 512   3   4
很是无语，这个512哪来的。。这是我的两个变量接口做的不对吗？