write.fortran

This is a lot easier

 for(k in
seq(1,nrow(m))){cat(c(sprintf("%7d",m[k,1]),sprintf("%16.7e",m[k,2:8]),"\n"))

Berend

Oops.
Missing sep="" and closing }.
The correct line is

for(k in
seq(1,nrow(m))){cat(c(sprintf("%7d",m[k,1]),sprintf("%16.7e",m[k,2:8]),"\n"),sep="")}

Berend

View this message in context: http://n4.nabble.com/write-fortran-tp1587119p1587272.html
Sent from the R help mailing list archive at Nabble.com.