similar to: Fortran subroutines dblepr, realpr, intpr

Hi I've built a dll using Fortran code and can call it by either R or Fortran. Calling by the former gives me the wrong answer and the later gives the correct answer. From what I've read, it looks like I should use the subroutines DBLEPR, INTPR and REALPR to get values to show up in R which I hope will allow me to find the error. I've downloaded the R-2.12.0.tar.gz but have

Hi I've built a dll using Fortran code and can call it by either R or Fortran. Calling by the former gives me the wrong answer and the later gives the correct answer. >From what I've read, it looks like I should use the subroutines DBLEPR, INTPR and REALPR to print to the R console rather than using Fortran standard I/O and that if I use the command R CMD SHLIB source.f that these

Hi, everyone. This may be properly a fortran question rather than an R question. I'm trying to add a few print statements to otherwise working fortran code in one of the libraries so I can see what's going on in the code. I have no problem doing so on an SGI machine, but under LinuxPPC I've run into a problem. The code compiles and creates a shared object (.so), but when I issue

Hi, Win95 version, trying to build multiv. Following error (no mention in faq etc, but someone may have mentioned it recently). Appreciate any help. ------- Building multiv.dll from multiv.a -------- echo LIBRARY multiv > multiv.def echo EXPORTS >> multiv.def nm multiv.a | sed -n "/^........ [DT] _/s/^........ [BCDRT] _/ /p" >> multiv.def gcc -mdll

Has anyone ever successfully used Fortran character strings with R? ?Foreign says R C Fortran integer int * integer .... character char ** [compiler dependent] Character strings are passed as C arrays of character strings to Fortran: the first string may be usable if its length is passed

Is there a way to exit gracefully from dynamically loaded Fortran, (several layers down), if an error condition is detected? I.e. suppose I'm within a subroutine called by a subroutine, ..., called by .Fortran(); I want to give up gracefully if an error condition is detected. If I say something like if(x .gt. 42.d0) stop then indeed everything stops, i.e. R falls over. I'd

Ravi Varadhan and I have been looking at UCMINF to try to identify why it gives occasional (but not reproducible) errors, seemingly on Windows only. There is some suspicion that its use of DBLEPR for finessing the Fortran WRITE() statements may be to blame. While I can find DBLEPR in Venables and Ripley, it doesn't get much mention after about 2000 in the archives, though it is in the R FAQ

Ravi Varadhan and I have been looking at UCMINF to try to identify why it gives occasional (but not reproducible) errors, seemingly on Windows only. There is some suspicion that its use of DBLEPR for finessing the Fortran WRITE() statements may be to blame. While I can find DBLEPR in Venables and Ripley, it doesn't get much mention after about 2000 in the archives, though it is in the R FAQ

I am trying to port the splancs library for S++ version 4.0 to R. I have modified the original FORTRAN to use dllwrap/dlltool (e.g. removed common blocks). I have been able to generate dll's (splancs.dll) using dllwrap/dlltool and Ming32 g77 with a -mdll switch. As of yet I have not been able to generate a dll that can be loaded by R. Does anyone out there have any suggestions. An example

I have just put R-0.62.3.tgz and R-0.62.2-0.62.3.diff.gz into the FTP area at Auckland. As usual, do not fetch it from there unless absolutely urgent, because of the NZ Internet billing system. The files should get mirrored to the main CRAN site in Vienna tonight and the rest of CRAN within days. [And, may I add, the NZ connection is slower than a sloth in a tarpit. I had turnaround times of up

I have just put R-0.62.3.tgz and R-0.62.2-0.62.3.diff.gz into the FTP area at Auckland. As usual, do not fetch it from there unless absolutely urgent, because of the NZ Internet billing system. The files should get mirrored to the main CRAN site in Vienna tonight and the rest of CRAN within days. [And, may I add, the NZ connection is slower than a sloth in a tarpit. I had turnaround times of up

Dear All, I am trying to do some simple mixture analyses. For instance, I have a sample of n observations and I suspect they come from two different exponential distributions with parameters rate1 and rate2, respectively. So, I want to estimate rate1, rate2, and the proportions of both kinds of individuals in the sample. I had a look at the packages mda and mclust, but they do not seem to do this

Is there a straightforward way to convert character information from decimal representation to the octal one used by R? I'd like something like a function ascii(number,base=10), such that > ascii(91) [1] "\133" I can easily do the mapping from 91 to 133, but what is a good way to operate on 133 to deliver "\133"? Would a lookup table be a better solution? David

Hi, I am searching for a way to solve the following problem: I want to use an external function, defined in a dyn.load()ed shared object, in another dyn.load()ed shared object. Currently I have to take the sources (Fortran) from one libraries src/ directory and copy them into the src/ dir of the other library, resulting in two copies of this function. This is bad for maintanance and maybe also

On Wed, 4 Aug 1999, Peter Ho wrote: > I have been browsing in the contributed packages webpage and found that > there is an R port for MClust. Is there a way I can use it using the > windows port of R 0.64.2? I could not find a windows port of MClust. Simple reason: I was not able to compile it successfully under Windows. I did make it compile after a lot of effort, but it crashed R on

I would like to call C routines from Fortran as suggested in section 5.6 of the "Writing R extensions" documentation. I'm familiar with Fortran but not with C. I understand the example provided in Fortran: subroutine testit() double precision normrnd, x call rndstart() x = normrnd() call dblepr("X was", 5, x, 1) call rndend() end but I don't understand the purpose

Hi David, I hope all is well w/ you. Co-operation beetwen R and Ox would be most welcome. A possible problem lies in the fact that, although free for academic use, Ox is not open source. I too have been using Ox for computer-intensive programming. I also code some of my programs in C, but I always try Ox first, and in most cases it is efficient enough. For details, see

I am aware of the nice R package "logspline", which does smooth density estimation from interval-censored data (that is, values that are known to lie in a specified interval rather than known exactly). Function logspline.fit uses a maximum penalized likelihood method, with the penalty related to the number of knots used in a cubic regression-spline fit. I need to be able to do some

I would like to call C routines from Fortran under linux as suggested in section 5.6 of the "Writing R extensions" documentation. I'm familiar with Fortran but not with C. I understand the example provided in Fortran: subroutine testit() double precision normrnd, x call rndstart() x = normrnd() call dblepr("X was", 5, x, 1) call rndend() end but I don't understand

Hi All, I have already used gcc to creat a library, for example, it is called "test.a", which includes many c objects. How to link my main "a.c" function to this library when I used Rcmd SHLIB to complier my main c program? I tried "Rcmd SHLIB a.c test.a". It does not work this way. Does anyone have idea about this? Thanks, Xiaoping