search for: tempnew

Hi Irucka, I tried it and was able to plot it without any errors.? Here, your code indicates you need two lines. temper[[i]][1] ?temper[[1]][1] # which is the column 1. ? Month 1???? 1 2???? 2 3???? 3 ?temper[[1]][2] #? Data1 #1?? 1.5 #2? 12.3 #3? 11.4 Suppose I use names(temper) instead of seq_along(temper) pdf("irucka.pdf") ?lapply(names(temper),function(i)

...mp3<- read.table(text=" ID CTIME WEIGHT HM001 1223 24.0 HM001 1224 25.2 HM001 1225 23.1 HM001 1226 NA HM001 1227 32.1 HM001 1228 32.4 HM001 1229 1323.2 HM001 1230 27.4 HM001 1231 22.4236 #changed here to test the previous solution ",sep="",header=TRUE,stringsAsFactors=FALSE) ?tempnew<- na.omit(temp3) ?grep("\\d{4}",temp3$WEIGHT) #[1] 7 9 #not correct temp3[,3][grep("\\d{4}..*",temp3$WEIGHT)]<-NA #match 4 digit numbers before the decimals tail(temp3) #???? ID CTIME? WEIGHT #4 HM001? 1226????? NA #5 HM001? 1227 32.1000 #6 HM001? 1228 32.4000 #7 HM00...

...Timeout(5) exten => t,1,Festival('Sorry, I did not get that') exten => t,2,Goto(581,5) exten => i,1,Festival('Sorry, that is an invalid choice') exten => i,2,Goto(581,5) exten => 1,1,System(/bin/mv /var/lib/asterisk/sounds/newrecording.gsm /var/lib/asterisk/sounds/lm1/tempnew/${TIMESTAMP}.gsm) exten => 1,2,Festival('Thank you, your recording has been saved.') exten => 1,3,Festival('Press 3 to record another file or 4 to hang up') exten => 2,1,Goto(581,1) exten => 3,1,Goto(581,1) exten => 4,1,Hangup [parkedcalls] ; Car movements emailed to...