?"[" ?InternalMethods x[i,j] is just shorthand for "["(x,i,j) . (AFAIK)**All** operators (+,-,...,subscripting,...) in R are functions, stemming from its LISP-like heritage, and can actually called by the usual functional syntax, f(...), instead of the operator syntax.
Not sure where this is explicitly discussed within R's documentation, but you can find info on it in V&R's "S Programming", esp. p.24 and 4.3, "Extracting or replacing coefficients". No doubt, other S/R books explain it also. Cheers, Bert Gunter Genentech Nonclinical Statistics 47374 -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of John Kane Sent: Thursday, March 13, 2008 11:53 AM To: Henrique Dallazuanna Cc: R R-help Subject: Re: [R] Splitting a set of vectors in a list (Solved ) My thanks to Henrique Dallazuanna and Phil Spector. Both solutions worked well. Phil suggested that an alterative to my function would be vect1 = sapply(mylist,'[[',1) and I see that Henrique used `[` in his solution. Can you point me to some documentation that discusses these usages. I have seen them before but I have never actually figured out how to use them.? Thanks. Problem and solutions ======================================================== mylist <- list(aa=c("cat","peach" ), bb=c("dog", "apple", "iron"), cc = c("rabbit", "orange", "zinc", "silk")) myfun <- function(dff) dff[1] vect1 <- unlist(lapply(mylist, myfun)) # Desired output t(cbind( c("cat" , "peach" , NA, NA), bbb <- c("dog" , "apple" ,"iron", NA), ccb <- c("rabbit" ,"orange" ,"zinc" , "silk" ))) # Phil Spector's approach mlen = max(sapply(mylist,length)) eqlens = lapply(mylist,function(x)if(length(x) < mlen) c(x,rep('',mlen-length(x))) else x) do.call(rbind,eqlens) # "Henrique Dallazuanna" <[EMAIL PROTECTED]> # I added the t() t(as.data.frame(lapply(mylist, `[`, 1:max(unlist(lapply(mylist, length)))))) [[elided trailing spam]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
