search for: t_ts_t1t2_chr

Displaying 1 result from an estimated 1 matches for "t_ts_t1t2_chr".

2012 Mar 26
0
filter and merge 2 big Df's by=t_chr in sec.
...t2_POSIXlt<-strptime(t2, "%Y-%m-%d %H:%M:%OS")# # ts_t1t2_POSIXlt<-seq(t1_POSIXlt,t2_POSIXlt,length.out =-1+2*length(seq(t1_POSIXlt,t2_POSIXlt, "sec") ) ) ts_t1t2_POSIXlt<-seq(t1_POSIXlt,t2_POSIXlt,length.out =length(seq(t1_POSIXlt,t2_POSIXlt, "sec") ) ) t_ts_t1t2_chr<-as.character(format(ts_t1t2_POSIXlt,"%Y-%m-%d %H:%M:%OS")) tail(t_ts_t1t2_chr) t_chr<-rep(t_ts_t1t2_chr,c((1:(-1+length(t_ts_t1t2_chr))),1)) str(t_chr) # system.time() Df.a<-as.data.frame(cbind(t_chr,a=c(1:length(t_chr)),b=2*c(1:length(t_chr)),c=0.1*c(length(t_chr):1))); D...