Re: [Rd] append/concatenate an element to a list in C-language

2007-10-18 Thread Tony Plate
This sounds like it could be dangerous, but if you're sure it's necessary and you know what you are doing, you could investigate whether the "pairlist" internal structure might enable you to do this (AFAIK, a "pairlist" is a traditional linked-list data structure). In general, pairlists seem t

Re: [Rd] append/concatenate an element to a list in C-language

2007-10-18 Thread Oleg Sklyar
Hi. I believe it is virtually impossible, maybe even not virtually: if you manage to do so somehow, please report it as a bug because such things must be impossible as they break the integrity of R and data. Forget about changing size in place: it is C and 'realloc' would be about the only way to

[Rd] append/concatenate an element to a list in C-language

2007-10-18 Thread Robert Castelo
dear people, i need to code a function in C working in R and receives two R SEXP objects as parameters, where one is a list and another is a vector of integers: void f(SEXP list, SEXP vector) { ... return list; } and it should return the given list with the integer vector concatenated at

Re: [Rd] Underlying representation for rownames

2007-10-18 Thread Prof Brian Ripley
I think ?.row_names_info is what you are looking for (although data frames have row.names and matrices have rownames, pace the subject line). On Thu, 18 Oct 2007, hadley wickham wrote: > Is it possible to get at the underlying representation of row names - > ie. what you see in the output from d

[Rd] Underlying representation for rownames

2007-10-18 Thread hadley wickham
Is it possible to get at the underlying representation of row names - ie. what you see in the output from dput: > df <- data.frame(1:4) > dput(df) structure(list(X1.4 = 1:4), .Names = "X1.4", row.names = c(NA, -4L), class = "data.frame") I would like to be able to tell if a data frame has the def

[Rd] Sweave wish items

2007-10-18 Thread Gabor Grothendieck
A scanario I have is spawning a Sweave job from another program (not necessarily written in R). That program needs to pass some information to the Sweave program including what the file name is of the report to produce. Currently it calls a shell script which calls R CMD Sweave but it would be ni

Re: [Rd] nmle: gnls freezes on difficult case

2007-10-18 Thread Nicholas Lewin-Koh
Hi, Thank you for the pointer, I will make the default in my code optim. As I specified in my last post it may be my installation. In this case the problem is that the third parameter (xmid) goes negative and the log(xmid) fails in the parameterization I am using. For some reason nlminb is not exi

[Rd] nmle: gnls freezes on difficult case

2007-10-18 Thread Nicholas Lewin-Koh
Hi, I was just able to try this on a windows xp machine using R-2.5.1. gnls exits gracefully with an error so maybe this is a problem with my R installation. If so sorry to bother everyone. Does anyone have an idea which installation parameters to tweek that might cure this? Thanks Nicholas ___

Re: [Rd] nmle: gnls freezes on difficult case

2007-10-18 Thread Prof Brian Ripley
On Thu, 18 Oct 2007, Nicholas Lewin-Koh wrote: > Hi, > Following up on my own post, if in gnlsControl I specify > opt='optim' gnls exits quite nicely, with an error, which > is what I would expect. Is this a bug in nlminb? Possibly, but complex algorithms can loop for non-bug reasons. I don't f

[Rd] nmle: gnls freezes on difficult case

2007-10-18 Thread Nicholas Lewin-Koh
Hi, Following up on my own post, if in gnlsControl I specify opt='optim' gnls exits quite nicely, with an error, which is what I would expect. Is this a bug in nlminb? Nicholas tt<-gnls(response~SSllogis(conc,A,B,xmid,scal),tdat,start=start,weights=varPower(),verbose=TRUE,control=gnlsControl(opt

[Rd] documentation bug for isoreg example (PR#10352)

2007-10-18 Thread btyner
Full_Name: Benjamin Tyner Version: 2.6.0 (43063) OS: WinXP Submission from: (NULL) (171.161.224.10) At the end of the examples for isoreg, there is cat("R^2 =", formatC(sum(residuals(ir4)^2) / (9*var(y4)), digits=2),"\n") I think this should be cat("R^2 =", formatC(1 - sum(residuals(ir4)