search for: intpr

I am making my first attempts at using some Fortran code with R, and so far it's going OK. To print from my Fortran programs, it seems I need subroutines dblepr, realpr and intpr. From the excellent "Writing R Extensions" document: "Three subroutines are provided to ease the output of information from FORTRAN code. subroutine dblepr(label, nchar, data, ndata) subroutine realpr(label, nchar, data, ndata) subroutine intpr (label, nchar, data, ndata)&quo...

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 been unable to find these subroutines or any examples of how to get Fortran to recognize them. Obviously when I try to compile I get undefined reference to &...

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 subroutines will automatically be found (Please correct me if I'm wrong about any of this). The problem is that I have to specify the gfortran compiler o...

...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 ***like*** to be able to print out an informative error message (which I guess could be done --- a wee bit kludgily --- by calling, say, intpr()) and then exit gracefully, with R continuing to run. Is this possible, or is it just too much too expect? cheers, Rolf Turner rolf at math.unb.ca -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-help mailing list -- Read http://www.ci.tuwien.ac...

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

...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 separately. and I have been taking a look. The linkage sends char ** to Fortran. On the other hand, INTPR and DBLEPR assume Fortran character strings are char *. On all my systems DBLEPR works and .Fortran does not, but I do know of one compiler (Watcom Fortran for Windows NT) where the linkage really is equivalent to char **. Fortran in S takes the first string in a character vector and passes tha...

...esult of icmp is always i1, and test argument (type 1) in select is also i1. Here is an .ll example: define i32 @f(i32 %a, i32 %b, i32 %c, i32 %d) { entry:   %cmp = icmp slt i32 %a, %b   %cond = select i1 %cmp, i32 %d, i32 %c   ret i32 %cond } and corresponding MIR snippet:     %4:_(s1) = G_ICMP intpred(sgt), %0(s32), %1     %5:_(s32) = G_SELECT %4(s1), %2, %3 On mips 32, integer compare uses i32 as result and that result is zero extended. For G_SELECT, we will select instructions that check whether "test register" was zero or not (selected instructions are movz or movn). Test registe...

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

...7_SYMBOL(func2)(a,n); printf("back in func1\n"); } ****************************** gcc -g -fpic -c so1.c -I/usr/local/lib/R/include ld -shared so1.o -o so1.so **** so2.f ******************* subroutine func2(a,n) real*8 a(*) integer n integer i call intpr("in func2",8,0,0) do 10 i=1,n a(i)=2.0d0 * a(i) 10 continue return end ****************************** g77 -g -fpic -c so2.f ld -shared so2.o -o so2.so on the Alpha (R 1.1.0 on alpha-dec-osf4.0) it works without problems: > dyn.load("so2.so&q...

Hi, Mips32 has 64 bit floating point instructions, while i64 instructions have to be emulated with i32 instructions. This means that G_LOAD should be custom legalized for s64 integer value, and be legal for s64 floating point value. There are also other generic instructions with the same problem: G_STORE, G_SELECT, G_EXTRACT, and G_INSERT. There are also other configurations where integer

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

Hi, Was wondering if there are any plans to update either the kernel structures and/or netstat to show more than 4GB of traffic stats. For example, on a 4.8-STABLE machine: $ netstat -bI sis0 Name Mtu Network Address Ipkts Ierrs Ibytes ... sis0 1500 <Link#2> <mac-addr-hidden> 8789598 0 4103727771 ... <non-relevant parts removed> This shows that

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

...will be the last of the 0.62 series, 0.63 is getting pretty stable now. Here's the top of the CHANGES file: CHANGES IN R VERSION 0.62.3 NEW FEATURES o preserve factor levels and contrast settings in model objects o factor[...,drop=T] reduces level set o added dblepr, intpr o do_modelmatrix(model.c): Set rownames from data argument. o New generic function preplot(). o A new R BATCH interface for non-interactive execution. o Added `offline' argument to help() for producing hardcopy via latex and dvips. o glm.fit.null now calculates...

...will be the last of the 0.62 series, 0.63 is getting pretty stable now. Here's the top of the CHANGES file: CHANGES IN R VERSION 0.62.3 NEW FEATURES o preserve factor levels and contrast settings in model objects o factor[...,drop=T] reduces level set o added dblepr, intpr o do_modelmatrix(model.c): Set rownames from data argument. o New generic function preplot(). o A new R BATCH interface for non-interactive execution. o Added `offline' argument to help() for producing hardcopy via latex and dvips. o glm.fit.null now calculates...

...H -g -c util.c -o util.o cc -I. -I../../src/include -I../../src/include -I/usr/local/include -DHAVE_CONFIG_H -g -c version.c -o version.o cc -I. -I../../src/include -I../../src/include -I/usr/local/include -DHAVE_CONFIG_H -g -c vfonts.c -o vfonts.o f77 -g -O2 -c xxxpr.f -o xxxpr.o xxxpr.f: intpr: realpr: dblepr: /Net/local/bin/cc -o R.bin CConverters.o Rdynload.o RNG.o apply.o arithmetic.o array.o attrib.o bind.o builtin.o character.o coerce.o colors.o complex.o connections.o context.o cov.o cum.o dcf.o datetime.o debug.o devPS.o devPicTeX.o deparse.o deriv.o devices.o dotcode.o dstru...