Search Archives

Christos Hatzis wrote: > Try > > split(x, row(x)) OOOOHHHHH! THE ELEGANCE! Thanks a lot! Joh

Hello, Has anybody solved this? Thanks, Joh

Hi, Is there such a thing? If no: is it easily simulated? thanks, Joh

jim holtman wrote: >> matches <- sapply(result, function(x){ > + ? ? .comma <- strsplit(x, ',')[[1]] ?# get the fields > + ? ? any(my.list %in% .comma) > + }) Thanks for that! Joh

Why is class(spectrum[["Ion"]]) after this "factor"? spectrum <- cbind(spectrum,Ion=rep("", nrow(spectrum)),Deviation.AMU=rep(0.0, nrow(spectrum))) slowly going crazy ... Joh

Ido M. Tamir wrote: > matchpt Thanks for this hint. It is exactly what I'm looking for. Cheers, Joh

Hello, Is there an elegant way to implement something like the elif function (e.g. python) and prevent multiple if-else contruct concatenation when coding in R? Sorry for my newbieishness, Joh

Hello, For verbose coding I'd like to do something like: > myfunction <- function(x){ > if (a){ > stop(paste(myfunction_name_here,"requires xyz!") > } Is that possible? Thanks for any hints, Joh

Hi, Why is the following retuning a nodset of length 0: > library(XML) > test <- xmlTreeParse( > "http://www.unimod.org/xml/unimod_tables.xml",useInternalNodes=TRUE) > getNodeSet(test,"//modifications_row") Thanks for any hint. Joh

Hello, How do I make R use the use.names option in a context like this: lapply(data, function(x)(read.table(x,quote="",header=TRUE,sep="\t")), use.names=TRUE) Thanks for any insights, Joh

Hi again, how to elegantly split s <- "ABCDEFGT(P)HIJK" into "A" "B" "C" "D" "E" "F" "G" "T(P)" "H" "I" "J" "K" (independently of which letters 'T' or 'P' actually represent ...). Please jumstart my regexing, Joh

Hi, Is there any R-generic, OS-agnostic way to figure out what end-of-line character is being used in a file to be processed by "readLines"? Thanks, Joh

Hello, Is it possible to get all "par" content calculated for "plot" without actually plotting anything? I'm missing an option "plot=FALSE" ... "type="n"" will still open a device and draw the axes ... Thanks, Joh

Hi, I have a list of vectors and am trying to coerce them into something that vioplot will take as groups of data to be plotted independently. Can someone nudge me into the right direction? Thanks, Joh

Hi, can someone point me at material to understand how in http://upload.wikimedia.org/wikipedia/commons/8/89/Boxplot_vs_PDF.png the "fivenum"-corresponding percentages might be calculated? Thanks, Joh

Hi, Any ideas on how to efficiently convert > list(c(1,2,3),c(4,5,6)) to > data.frame(OriginalListIndex=c(1,1,1,2,2,2),Item=c(1,2,3,4,5,6)) Thanks for any hints...

Dear Rologists, I'm stuck with this. How would you do this efficiently: > aPGI [[1]] [1] "864" "5576" > aPGItest [[1]] [1] TRUE FALSE > result <- [magic box involving subset) > result [[1]] [1] "864" Thanks for any hints, Joh

Hello, Is there a way to get the name of the function currently running? I'd like to have something like this x <- function(){ myName <- getNameOfCurrentFunction cat(myName) } so that x() would result in "x" Thanks for any pointers, Joh

How can I test whether a plot I'm about to call will be within a "layout" or not? I need to fix some par options based on that ... Thanks, Joh

Johannes Graumann wrote: > Has anybody solved this? For the benefit of others: after studying > ?panel.bwplot I have to admit that > bwplot(..., varwidth = TRUE) solves the issue. It's just not documented at > ?bwplot Cheers, Joh