Displaying 1 result from an estimated 1 matches for "n4656723".
2013 Jan 26
2
a function more appropriate than 'sapply'?
...'m wondering if I need to use a function other than sapply as the following
line of code runs indefinitely (or > 30 min so far) and uses up all 16Gb of
memory on my machine for what seems like a very small dataset (data attached
in a txt file wells.txt
<http://r.789695.n4.nabble.com/file/n4656723/wells.txt> ). The R code is:
wells<-read.table("c:/temp/wells.txt",col.names=c("name","plc_hldr"))
wells2<-wells[sapply(wells[,1],function(x)length(strsplit(as.character(x),
"_")[[1]])==2),]
The 2nd line of R code above gets bogged down and takes...