Displaying 1 result from an estimated 1 matches for "fwhini".
Did you mean:
whini
2010 Jan 07
2
Problem with writeBin and importing into gfortran compiled programs
Hi all,
I'm having problems trying to export binary arrays from R and importing
them into fortran (linux openSUSE 10.3 (x86_64), gfortran compiler,
fortran 90/95 program).
Let's say the problem can be expressed as:
R part
------------
>whini <- runif(1000)
>writeBin(whini,"fwhini.dat")
f90 part
------------
PROGRAM foo
INTEGER, PARAMETER :: DP = KIND(1.0D0)
INTEGER :: status
REAL(DP), DIMENSION(10,100) :: whini
OPEN(UNIT=5, FILE='fwhini.dat', STATUS='OLD', ACTION='READ', &
FORM='UNFORMATTED', IOSTAT=status)
READ(5) whini
CLOSE(...