Re: [Rd] Use of cfortran.h?

From: Prof Brian Ripley <>
Date: Fri, 06 Feb 2009 22:45:34 +0000 (GMT)

All you need to do is to write a fortran-callable wrapper for a C interface: there are F77_* macros to allow this. They do not work on every possible platform, but they work on the platforms R runs on (since building R relies on them).

E.g. intpr (a call to R's print routines from Fortran) provides a good prototype. It is in src/main/xxxpr.f an print.c (it would be simpler if Fortran character types were not involved).

I don't suppose you are comtemplating complex variables, but if you were, a great deal of care is needed in the C/Fortran interfaces.

On Fri, 6 Feb 2009, wrote:

> I'm planning to try to use Mike Powell's new BOBYQA optimization routine
> to see if it is a good candidate to eventually replace Nelder-Mead as the
> optim() default. (Don't panic -- this won't happen quickly.) Mike writes
> f77 code. After some chasing about, I've realized that because
> optimization codes need to call the objective function written in R, they
> need to use a language that can do this. C can, Fortran cannot.
> There is, however, a package cfortran that allows for mixed coding in C
> and Fortran. This might not be the ultimate solution -- e.g., it may not
> be Windows usable. However, it could be a useful tool to try out some
> programs that are already available in Fortran.
> My query is to ask if anyone has experience they can share in using
> cfortran.h. I'd also welcome (off-list may be best) input on directions
> for improving or at least tidying optim() and many related capabilities in
> R.
> John Nash
> ______________________________________________
> mailing list

Brian D. Ripley,        
Professor of Applied Statistics,
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272866 (PA)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595

______________________________________________ mailing list
Received on Fri 06 Feb 2009 - 22:47:49 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Sat 07 Feb 2009 - 16:30:20 GMT.

Mailing list information is available at Please read the posting guide before posting to the list.

list of date sections of archive