Displaying 3 results from an estimated 3 matches for "stop1".
Did you mean:
stop
2010 Jun 24
1
?to calculate sth for groups defined between points in one variable (string), / value separating/ spliting variable into groups by i.e. between start, NA, NA, stop1, start2, NA, stop2
...11 12 13 14 15 16 17
c0<-rbind( 1, 2 , 3, 4, 5, 6, 7, 8, 9,10,11, 12,13,14,15,16,17 )
c0
c1<-rbind(10, 20 ,30,40, 50,10,60,20,30,40,50, 30,10, 0,NA,20,10.3444)
c1
c2<-rbind(NA,"Start1",NA,NA,"Stop1",NA,NA,NA,NA,NA,NA,"Start2",NA,NA,NA,NA,"Stop2")
c2
C.df<-data.frame(cbind(c0,c1,c2))
colnames(C.df)<-c("c0","c1","c2")
C.df
# preparation of form for explaining further needed result (next 3 lines are not needed indeed, they are only t...
2011 Jan 15
2
access to right time unit when checking for time execution
Hello,
I really wonder how to distinguish between secs and mins in the example
below.
In other terms, how can I access the time unit in variable d ?
start1 <- Sys.time();
stop1 <- Sys.time(); d <- stop1-start1; print(d);
v<-unlist(strsplit(as.character(d), split=" ")); print(v)
Time difference of 3.024054 secs
[1] "3.02405381202698"
stop1 <- Sys.time(); d <- stop1-start1; print(d);
v <- unlist(strsplit(as.character(d), split="...
2011 Jan 30
1
Extract subsets of different and unknown lengths from huge dataset
...want to subset the single events for the purpose
of examining the maximum value within each event.
I tried:
> xx1 <- read.table(pipe("cut -f2 corrected_data.txt"),header=T)
> nrow(xx1)
[1] 2500000
> start1 <- data.frame(start=rep("NA",length.out=nrow(xx1)))
> stop1 <- data.frame(stop=rep("NA",length.out=nrow(xx1)))
> max.xx1 <- data.frame(max.xx=rep("NA",length.out=nrow(xx1)))
> XXframe <- data.frame(XX=xx1, start=start1, stop=stop1, max.xx=max.xx1)
> attach(XXframe)
> for(i in 1:(nrow(XX)-25)){
+ start[i+24] <- if...