similar to: choose

Hola! look at the following: > test <- function() { + options(warn=-1) + on.exit( options(warn=0)) + log(-1) + } > test() [1] NaN but what should be better, doesnt work: > test1 <- function() { + oldwarn <- options("warn") + options(warn=-1) + on.exit( options(warn=oldwarn)) + log(-1) + } > test1() Error in options(...) : warn parameter

(I tried to send this earlier, but it doesnt seem to have come through, due to problems on my system) Hola: Both cannot be correct: > m <- matrix(1:4, 2) > svd(m) $d [1] 5.4649857 0.3659662 $u [,1] [,2] [1,] -0.5760484 -0.8174156 [2,] -0.8174156 0.5760484 $v [,1] [,2] [1,] -0.4045536 0.9145143 [2,] -0.9145143 -0.4045536 > La.svd(m) $d [1]

....in example data <- read.spss("c:/data.sav",use.value.label=F,to.data.frame=T) try help(read.spss) ! regards,christian kjetilh at umsanet.edu.bo schrieb am 28.08.02 02:08:39: > Hola! > > Can the foreign package now read data from spss 10? > > Kjetil Halvorsen > -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- > r-help

The following code in clusplot.default (package cluster) is in error: x1 <- cmdscale(x, k = 2, eig = TRUE) var.dec <- sum(x1$eig)/sum(diag(x1$x)) if (var.dec < 0) var.dec <- 0 if (var.dec > 1) var.dec <- 1 x1 <- x1$points x1 has components with names "points" and "eig", not "x", so

When R prints warnings, they often go "out of the line", it would be better if they where wrapped with writeLines(strwrap ... I tried to do that , changing the function warnings, but it has only effect when called explicitely, not when R prints the warnings unasked. Anyhow, here is the changed warnings: warnings <- function (...) { if (!(n <- length(last.warning)))

I am resubmitting this to r-bugs, since Thomas Lumley indicates that it might be an error: On Wed, 5 Jul 2000, Thomas Lumley wrote: > On Wed, 5 Jul 2000, halvorsen wrote: > > > Hola! > > > > I have the following simple function: > > > > > testcar > > function(pow){ > > ob <- glm(Pound~CG+Age+Vage,data=car,weights=No, > >

(I sent this earlier, but it seems not to have come through, due to problems witkh my system) The following command from appendix A, "a sample session", isnt correct: contour(x, y, fa, nint=15) when used R protests: Warning message: parameter "nint" couldn't be set in high-level plot() function it should probably be nlevels, as used a few lines before. This is

chisq.test with simulate.p.value=TRUE uses the Patefield algorithm, this is not documented, and the original reference is not given, as it ought to be. The reference is: Patefield,W. M. (1981) An efficient method of generating r * c tables with given row and column totals (algorithm AS 159). Applied Statistics 30, 91-97. Kjetil Halvorsen

Hola! > rm(list=ls(all=TRUE)) > x <- 1:20 > y <- 1+x+rnorm(x) > xy.coords(y ~ x,NULL) ... expected output, correct, but when called from inside lowess: > lowess(y ~ x) Error in xy.coords(x, y) : x and y lengths differ > debug(xy.coords) > lowess(y ~ x) debugging in: xy.coords(x, y) ... long listing deleted if (is.language(x)) { if (inherits(x,

This is R1.9.0, windows XP I run across the following: It is admittedly silly, but it shouldn't segfault: test <- list(y=1:100, x=rep(NaN, 100)) approx(test, xout=rep(NaN, 10)) Bombs! Kjetil Halvorsen

> From: kjetil halvorsen [mailto:kjetilh at umsanet.edu.bo] > > Martin Hoyle wrote: > > > > Dear Greg, > > Thanks for the new release. The decomposition of the SSQ is > just what I need! > > > I thought decomposition of the SSQ can be obtained with the split= > argument to summary.aov? That argument seems tro be new --- it didnt > exist two years

I reported this earlier, and have got reports that others have the same promlem on UNIX machines, so it is not only a windows problem S I file a bug report. The function (boot.stat) given at the end produces a postscript file, which cannot be included correctly in LaTeX. Specifically, the image in LaTeX (when translated by dvips to postscript) becomes very small, not using the bounding box, and

Hola! This is windows XP, rw1062. When running Rcmd check on a package, I get (among others) the message: ERROR: Environment text <enclosed in {}> found in \title{...}. The title must be plain text! but it does not mention in which .Rd file this error was found, so it was necessry to look through about 50 files. It would be usefull if the error message mentioned the file name. Kjetil

Hello friends, I would like to thank you all for your advices. Rcmdr is gread. All the best, Mehdi ********************* Mehdi Zarrei, PhDPostdoctoral fellowUniversity of Toronto Dept. of Ecology & Evolutionary Biology Royal Ontario Museum Department of Natural History Green Plant Herbarium (TRT) 100 Queen's Park Toronto, On., M5S 2C6, CanadaE-mail:

Hola! I ask here since I learnt from this list that the LaTeX package listings should be good for typesetting R code. I encountered one problem: \begin{lstlisting} X %*% V \end{lstlisting} in the output the * in %*% disappears! same with %/%, etc, the / disappears. Any ideas? Kjetil -- Kjetil Halvorsen. Peace is the most effective weapon of mass construction. --

Dear all, I''m working with the geometric distribution for the time being, and I''m confused. This may have more to do with statistics than R itself, but since I''m getting results from R I find counterintuitive (well, yeah, my statistical intuition has not been properly sharpened), I feel like asking. The point first: If I do > rgeom(1,prob=1) I get: [1] NaN Warning

Hola! I got past the problems I asked about two days ago, thanks. No I am updating CRAN package asypow (the daily package check on CRAN gave warnings due to .Rd problems, fixed). Now it PASSED Rcmd check (WindowsXP home edition, rw2000dev, on a new toshiba laptop, if that matters.) but then Rcmd build --binary gives problems: . . . preparing package asypow for lazy loading Error in

Hola! I have some problems with gam in mgcv. Firts a detail: it would be nice igf gam would accept an na.action argument, but that not the main point. I want to have a smooth term for time over a year, the same pattern repeating in succesive years. It would be natural then to impose the condition s(0)=s(12). Is this possible within mgcv? I tried to obtain this with trigonometric terms, aca:

Hola! I am sending this to the list since emails from me to Simon Wood has bounced earlier. I get: > library(tsDyn) Loading required package: mgcv Erro en `parent.env<-`(`*tmp*`, value = NULL) : use of NULL environment is defunct Error: package 'mgcv' could not be loaded > library(mgcv) Erro en `parent.env<-`(`*tmp*`, value = NULL) : use of NULL environment

I am trying to source a file defining a dataset, giving the full path. (rw1031 on windows 98) > source("c:\\kjetil\\audiometria\\data\\audiometria.R") Error in parse(file, n, text, prompt) : syntax error on line 6 also: > parse(file="c:\\kjetil\\audiometria\\data\\audiometria.R", n=-1) Error in parse(file, n, text, prompt) : syntax error on line 6 This seems very