Fortran?

An embedded and charset-unspecified text was scrubbed...
Name: not available
Url: https://stat.ethz.ch/pipermail/r-help/attachments/20051014/d37c3a78/attachment.pl

In a package, i type a function name and got the following message:
...
 tmp <- .Fortran("master", x = as.double(x), y = as.double(y), 
            sort = as.logical(sort), rw = as.double(rw), npd = as.integer(npd), 
            ntot = as.integer(ntot), nadj = integer(tadj), madj = as.integer(madj), 
            ind = integer(npd), tx = double(npd), ty = double(npd), 
            ilist = integer(npd), eps = as.double(eps), delsgs = double(tdel), 
            ndel = as.integer(ndel), delsum = double(ntdel), 
            dirsgs = double(tdir), ndir = as.integer(ndir), dirsum = double(ntdir), 
            nerror = integer(1))
...
does it mean this function is using something from FORTRAN?
You have asked twice. Please:

PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

When uncertain what a function does, type help(function_name), or 
?function_name, here ?.Fortran, for the answer to your question.
Thanks a lot!

---------------------------------

	[[alternative HTML version deleted]]

______________________________________________
R-help at stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Roger Bivand
Economic Geography Section, Department of Economics, Norwegian School of
Economics and Business Administration, Helleveien 30, N-5045 Bergen,
Norway. voice: +47 55 95 93 55; fax +47 55 95 95 43
e-mail: Roger.Bivand at nhh.no
"Sam R. Smith" <samrobertsmith at yahoo.com> writes:
In a package, i type a function name and got the following message:
...
 tmp <- .Fortran("master", x = as.double(x), y = as.double(y), 
            sort = as.logical(sort), rw = as.double(rw), npd = as.integer(npd), 
            ntot = as.integer(ntot), nadj = integer(tadj), madj = as.integer(madj), 
            ind = integer(npd), tx = double(npd), ty = double(npd), 
            ilist = integer(npd), eps = as.double(eps), delsgs = double(tdel), 
            ndel = as.integer(ndel), delsum = double(ntdel), 
            dirsgs = double(tdir), ndir = as.integer(ndir), dirsum = double(ntdir), 
            nerror = integer(1))
...
does it mean this function is using something from FORTRAN?
Well, it's using a binary object that was compiled from FORTRAN code.

The sources for the package will contain the actual human-readable
code. For more details (likely more than you can handle at this
point...), look in the Writing R Extensions manual.
Thanks a lot!

O__  ---- Peter Dalgaard             ??ster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark          Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard at biostat.ku.dk)                  FAX: (+45) 35327907