search for: relisted

Dear list, I think I just stumbled across a bug in either 'relist()' and/or 'as.relistable()'. It seems that 'pairlists' can only be un- and relisted as long as they're not nested: Good: a <- as.relistable(as.pairlist(list(a=1, b=2))) a <- unlist(a) relist(a)# Works Bad: a <- as.relistable(as.pairlist(list(a=1, b=2, c=list(c.1=1, c.2=2)))) a <- unlist(a) relist(a) The help page didn't say anything about pairlists and I don...

Hi all, I wrote a function called relist, which is an inverse to the existing unlist function: http://www.econ.upenn.edu/~clausen/computing/relist.R Some functions need many parameters, which are most easily represented in complex structures. Unfortunately, many mathematical functions in R, including optim, nlm, and grad can only operate on functions whose domain is a vector. R has a

Dear all, The following code is inspired by the help file for the relist() function (see?relist), which explicitly details how you can use a relistable object in conjunction with optim to pass and reconstruct complex parameter structures/groupings. The idea is that the optim() function can only work with vectors, but in many cases you would like to use a complex structure inside the objective

...nlisted Object} \description{ \code{relist()} is an S3 generic function with a few methods in order to allow easy inversion of \code{\link{unlist}(obj)} when that is used @@ -33,8 +33,9 @@ } \arguments{ - \item{flesh}{ .....} - \item{skeleton}{ .........} + \item{flesh}{a vector to be relisted} + \item{skeleton}{a list, the structure of which determines the structure + of the result} \item{x}{an \R object, typically a list (or vector).} \item{recursive}{logical. Should unlisting be applied to list components of \code{x}?} @@ -42,13 +43,13 @@ } \details{ Some functions...

Hi, relist() is broken when the skeleton is a list with empty list elements: > x <- list(1:3, integer(0), 11:14) > relist(unlist(x), x) [[1]] [1] 1 2 3 [[2]] [1] 11 3 [[3]] [1] 11 12 13 14 Hard to believe that such a bug has been around for 6 years (i.e. since the introduction of relist()) without ever being noticed. Cheers, H. > sessionInfo() R

I think the optim() example in the Details section of relist()'s help page is not totally correct. In particular, in the current form it is not taken into account that vcov should be a symmetric matrix and only the parameters in the lower (or upper) triangular part should be optimized. A possible fix is: ipar <- list(mean = c(0, 1), vcov = c(1, 1, 0)) initial.param <-

I have tried to upgrade our samba server from 3.6.18 to 3.6.22 but found that our DOS clients could no longer connect (using DOS 6.22 and Microsoft LAN Manager 2.1). With 3.6.18 we use smb.conf setting 'min protocol = LANMAN2' and it works great, with 3.6.22 although clients can connect ok, they cannot obtain a directory listing. Instead the first file (sometimes misnamed) just

Hello, I have a function with a long list of parameters (of different types, numeric and string) myFunc <-function(p1, p2, p3, p4, p5...etc) { do.something(p1,p2,....) } I want to loop over this to provide a different set of parameters to the list every time. for (ii in 1:N) { myFunc(p1(ii), p2(ii),....etc) } I would like to simplify the notation and use some kind of structure, maybe

Hello all, For some work I am doing on RNA, I want to use R to do string parsing that (I think) is like a simplistic HTML parsing. For example, let's say we have the following two variables: Seq <- "GCCTCGATAGCTCAGTTGGGAGAGCGTACGACTGAAGATCGTAAGGtCACCAGTTCGATCCTGGTTCGGGGCA" Str <-

Hello, Have spotted strange behaviour of GlusterFS fuse mount. I am unable to list files in a directory until parent directory is listed. However if I do list file with full path it is listed on some client nodes. Example: localadmin at ldgpsua00000038:~$ ls -al /var/lib/nova/instances/_base/ ls: cannot access /var/lib/nova/instances/_base/: No such file or directory localadmin at

A version using regular expressions, regexpr() and substr() functions is attached. Finally everything is packed into splitSeq() function (chunk 14 in the attached file) Seq<- "GCCTCGATAGCTCAGTTGGGAGAGCGTACGACTGAAGATCGTAAGGtCACCAGTTCGATCCTGGTTCGGGGCA" Str<-

I know that it has been discussed in the past, but I wanted to ask to revisit the idea of exporting is.formula <- function(x) inherits(x, "formula") from 'stats', parallel to is.data.frame() in 'base', given how widely formulae are used these days in conjunction with data frames, even outside of model fitting functions (e.g., for split-apply). One could argue

Hello All, I have multiple "list of lists" in the form of Mylist1[[N]][[K]]$Name_i, with N=1..6, K=1..3, and i=1..7. Each Name_i is a matrix. I have 30 of these objects Mylist1, Mylist2, ... I would like to merge these lists by each Name_i using rbind, but I couldn't figure out how to do it. What I want at the end is a single "list of lists", again in the form of

...server. I've corrected this since. =) > id=69 is the normal success code. You'd get -1 if it failed I think. > What's your ip address? I'll go check the logs. The ip address of my streaming server is 216.133.255.2 > Other people are being added fine, since they all got relisted after i > purged the database. So I'm guessing I'm not escaping something > correctly that is in your variables, or the fields are too short, or > something. That could be. I am still understanding this system, how do you get the genre information in? It's not in the initial...

Jack Moffitt <jack@xiph.org> writes: > The source is in icecast cvs in the 'icedir' module. But what's > actually running is slightly modified. Heh. Is it possible to see a copy of what is actually running? I'm probing the directory server with a quick script but I'm getting 400 URL must be absolute which I should figure out soon. >>

I am experiencing some problems at working with lists at high level. In the following "coef" contains the original DWT coefficients organized in a list. Thorugh applying the following two commands: coef.abs <- lapply(unlist(coef,recursive=FALSE,use.names =TRUE),abs) coef.abs.sorted <- sort(unlist(coef.abs),decreasing=TRUE) I get vector "coef.abs.sorted" containing

Hello, I have a nested named list structure, like the following: x <- list( list( list(df1,df2) list(df3, list(df4,df5)) list(df6,df7))) with df1...d7 as data frames. Every data frame is named. Is there a way to get a specific named element in x? so, for example, x[[c("df5")]] gives me the data frame 5? Thank you in advance! Best, Friedericksen

Dear R-Helpers, I have a list l1 like: l1[[1]] a b c l1[[2]] d l1[[3]] e f I want an output res like: res[[1]] 1 1 1 res[[2]] 2 res[[3]] 3 3 Essentially, I want to replicate each index equal to the number of elements present in that index. Below is what I do to accomplish this: l1 <- list(c("a", "b", "c"), "d", c("e", "f"))

...n't discovered until later). However, the print queues on the test system refuse to stay listed in AD for more than 10-20 minutes at a time, which was particularly confusing until I (somewhat accidentally) noticed that querying the domain users or groups via wbinfo would cause the queues to be relisted. Further investigation, including digging through packet dumps, uncovered the following: - Joining the domain only works when kinit and 'net ads join' are run using the domain Administrator account; Samba consistently fails to verify Kerberos tickets when joined to the domain with any oth...

Hello, I submit a patch for review that implements code coverage tracing in the R interpreter. It records the lines that are actually executed and their associated frequency for which srcref information is available. I perfectly understands that this patch will not make its way inside R as it is, that they are many concerns of stability, compatibility, maintenance and so on. I would like to have