search for: ierr

...^ Missing comma in FORMAT statement at (^) ace.f:324: warning: 610 format( 15h iteration i2, 23h r**2 = 1 - e**2 =g12.4) ^ Missing comma in FORMAT statement at (^) ace.f:327: warning: 640 format( 14h ierr=3: ty(.,i2, 20h) has zero variance.) ^ Missing comma in FORMAT statement at (^) ace.f:328: warning: 650 format( 11h ierr=4: l(i2, 18h) must be nonzero.) ^ Missing comma in FORMAT statement at (^) ace.f:329: warning:...

...9;\0') { + ac--; av++; p = *av; + } + else p = &(*av)[2]; + if (p == NULL) { + REprintf("WARNING: no hsize given"); + break; + } + value = Decode2Long(p,&ierr); + if(ierr) { + if(ierr < 0) goto badargs; + REprintf("--histsize %ld'%c': too large", value, + (ierr == 1)?'M':((ierr == 2)?'K':'k')); + } + if(val...

...quot;, ff, rho = environment(), as.double(bound), as.integer(inf), as.double(abs.tol), as.double(rel.tol), limit = limit, PACKAGE = "base") } res <- wk[c("value", "abs.error", "subdivisions")] res$message <- switch(wk$ierr + 1, "OK", "maximum number of subdivisions reached", "roundoff error was detected", "extremely bad integrand behaviour", "roundoff error is detected in the extrapolation table", "the integral is probably divergent",...

The following patch adds a trivial family method for linear models. -k --- src/library/base/funs/lm.orig Tue May 27 02:53:58 1997 +++ src/library/base/funs/lm Sun Aug 10 22:00:46 1997 @@ -412,3 +412,5 @@ } formula.lm<-function(x)formula(x$terms) + +family.lm <- function(x) { gaussian() } =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- r-devel mailing list

Hi list, It appears there is a problem with the OpenMPI I/O library on CentOS 6.2 & 6.3 (package openmpi-1.5.4-1.el6.x86_64). When I compile the attached program it ends up in the error path since MPI_File_open returns 16. The corresponding (unhelpful) message is: MPI_ERR_OTHER: known error not in list I couldn't find any pointers on the net and the same program works with OpenMPI

...quot;integer" mode(ipen) = "integer" mode(is) = "integer" mode(thr) = "double" junk <- .Fortran("glasso", n, s, rho, ia, is, itrace, ipen, thr, maxit = maxit, ww = ww, xx = xx, niter = integer(1), del = double(1), ierr = integer(1), PACKAGE = "glasso") ww = matrix(junk$ww, ncol = n) xx = matrix(junk$xx, ncol = n) if (junk$ierr != 0) { stop("memory allocation error") } critfun = function(Sigmahati, s, rho, penalize.diagonal = TRUE) { d = det(Sigmahati)...

...ilable daemon . ${SSH_ENV} > /dev/null # Add authentication to this and only this daemon ssh-add } if [ -f "$SSH_ENV" ]; then # Find SSH_AUTH_SOCK and SSH_AGENT_PID of the available daemon . ${SSH_ENV} > /dev/null # Check if the agent is still running ierr=0 ps ${SSH_AGENT_PID} > /dev/null || ierr=1 if [ $ierr == "0" ]; then echo > /dev/null else # If not initialize new agent and # add authentication start_agent; fi else start_agent; fi export PATH=$PATH:/home/iloshakov:/home/tdine...

Hello everyone, i just updated from 4.2.1 to 4.2.2. If i try to fire up my win2k8 domU with a pci device attached, the dom0 machine hardcrashes. my system log (idrac) shows the following: CPU 2 has an internal error (IERR). A bus fatal error was detected on a component at bus 0 device 0 function 0. CPU 1 machine check detected. and plenty of other entries. The machine hardresets then. If i leave the faulty machine down after a reboot, nothing like this happens. xl info: > host : susi-0 > r...

...if (is.na(lower) || is.na(upper)) stop("a limit is missing") if (lower == upper){ wk <- list("value" = 0, "abs.error" = 0, "subdivisions" = subdivisions, "ierr" = 0 ) } else { if (is.finite(lower)) { inf <- 1 bound <- lower } else if (is.finite(upper)) { inf <- -1 bound &...

We are having problems building R on Red Hat Linux 6.0/Sparc. R compiles with no problem but then it fails "make tests". Specifically, the line eigen(cbind(-1,c(1:2,0),0:2)) # complex values causes a segmentation fault. Previous versions of Red Hat Linux did not give this problem. The eigen() function is one of the rare cases in the base library where Fortran code is called via the

...emory.c you define (and initialize) gc_inhibit_torture again: int gc_inhibit_torture = 1; /* gets set to zero after initialisations */ Then, in e.g. unix/system.c immediately at the beginning of main() you initialize gc_inhibit_torture once more: int main(int ac, char **av) { int value, ierr; char *p, msg[1024]; structRstart rstart; Rstart Rp = &rstart; gc_inhibit_torture = 1; Can anybody explain the reason for this implementation? ============================================================================= Thomas Hoffmann, Institut fuer Halbleiter- und Mikr...

...g panel data. I am trying to use the model that is described in Dr. Koenker's article. So I use the code the that is posted in the following link: http://www.econ.uiuc.edu/~roger/research/panel/rq.fit.panel.R This code run perfectly. Then I want to know what the result means.The result show $ierr,$it,and $time. What these estimators means in quantile panel data? And does $coef ,the coefficient estimators order by m*p + n elements? Here comes my questions What do these estimators' mean in quantile panel data? And does the coefficient, $coef, estimators order by m*p + n elements? Thank...

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 sis0 has received around 3.9GB. Then, after transferring approximately 200MB: $ netstat -bI sis0 Name Mtu Network Address Ipkts Ierr...

...rep(1:n,rep(m,n)) x <- exp(rnorm(n*m)) X <- cbind(1,x) u <- x*rnorm(m*n) + (1-x)*rf(m*n,3,3) a <- rep(rnorm(n),rep(m,n)) y <- a + u fit <- rq.fit.panel(X,y,s) When I use "summary(fit)", I get the following output... Length Class Mode coef 16 -none- numeric ierr 1 -none- numeric it 1 -none- numeric time 1 -none- numeric When I use "list(fit)", I can't tell which coefficients correspond to which parameters... [[1]]$coef [1] 7.701321 -2.608782 7.664906 -1.866059 7.894542 [6] -1.878973 -6.117778 -1.570840 -5.380230 -5.8152...

Full_Name: Ricardo Luiz de Andrade Abrantes Version: 2.1.1 OS: Debian Linux, kernel 2.6.8 Submission from: (NULL) (201.6.83.153) The problem can be well explained with the following example: Suppose I made a program in fortran, and a C interfacece to it. Now I want to use this C interface in R to call my fortran program. Then I modified my C file to deal with SEXPs and compile it as a shared

...owse[1]> ... ## go through ace until before .Fortran call Browse[1]> table (is.na (t(x))) FALSE 6244 Browse[1]> debug: junk <- .Fortran("mace", p = ncol(x), n = nrow(x), x = t(x), y = y, w = wt, l = l, delrsq = delrsq, ns = ns, tx = tx, ty = ty, rsq = double(1), ierr = integer(1), m = m, z = z) Browse[1]> junk Error: Object "junk" not found I am trying to find a smaller example that has the same effect so I could send it to the list but was not successful until now, especially as I do not really have any idea in what direction to search. Any poin...

...Output AHE array IHR_out, & !! Output IHR array Errors_out) ! Expose subroutine my_function to users of this DLL !DEC$ ATTRIBUTES DLLEXPORT,C,REFERENCE,ALIAS:'VALUEAHROPTIMIZE_'::VALUEAHROPTIMIZE ! Body of my_function Implicit None Integer *4 IERR, iSum DOUBLE PRECISION min_IHR_delta, max_AHR_error logical switch_AHR_tuner character * 512 AHR_tuner_FilePath !!DOUBLE PRECISION AHR(500), kW(500) !! Initial Array for reading Namelist DOUBLE PRECISION AHR(*), kW(*) !! Initial Array for reading Namelist DOUBLE PRECISIO...

...bove, the throughput is much worse, with less than 1 MBps coming through. can pull pretty much full linespeed (12 MBps =~ 100 Mbps) using scp from this same server, so it's not likely errors on the interface. just to be clear # netstat -i Name Mtu Network Address Ipkts Ierrs Opkts Oerrs Colls lo0 33192 <Link> 0 0 0 0 0 lo0 33192 loopback localhost.X 0 0 0 0 0 lo0 33192 localhost.s localhost.X 0 0 0 0 0 lo0 33192 fe80::%lo0/ fe80::1%lo0...

Full_Name: Chanseok Park Version: 1.8.1 OS: linux-gnu Submission from: (NULL) (130.127.112.183) digamma with any negative value does not give a right answer. It gives -1.797693e+308 for any negative arguments. For example, digamma(-1.1) gives -1.797693e+308. The right answer should be 10.15416 This bug can be easily fixed by using the following digamma identity. digamma(x) = digamma(1-x) -

...n), as.integer(n), sol = as.double(rep(0, n)), crval = as.double(0), as.double(Amat), as.double(bvec), as.integer(n), as.integer(q), as.integer(meq), iact = as.integer(rep(0, q)), nact = as.integer(0), iter = as.integer(rep(0, 2)), work = as.double(work), ierr = as.integer(0), PACKAGE = "quadprog") ...where I have highlighted the offending argument (8). Now, there is nothing unusual that I can see about my data. Unfortunately with the .Fortran I don't think I can troubleshoot any further. I am hoping someone here has a clue... T...