I've written out codes for one particular file, and now I want to generate the same kind of graphs and files for the rest of similar data files.
When I plugged in these codes, R produced only one plot for the file "eight", and it states my error(see below) I have edited and checked my codes so many times but still couldn't figure out what's wrong with it...would you please help me? Thanks! my.files <- list.files() for (i in 1: length(my.files)) { temp.dat <- read.csv(my.files[i]) eight <- read.csv(file="8.csv", header=TRUE, sep=",") eightout <- subset(eight, inout=="Outgoing from panel hh" & o_duration>0, select=c(inout, enc_callee, o_duration)) f <- function(eightoutf) nrow(eightoutf) eightnocalls <- ddply(eightout,.(enc_callee),f) colnames(eightnocalls)[2] <- "nocalls" eightout$nocalls <- eightnocalls$nocalls [match(eightout$enc_callee, eightnocalls$enc_callee)] eightout=data.frame(eightout,"time"=c(1:nrow(eightout))) plot(eightout$time,eightout$nocalls) write.csv(eightout, "eight.csv", row.names=FALSE) pdf(paste(Sys.Date(),"_",my.files[i],"_.pdf", sep="")) plot(temp.dat$time, temp.dat$nocalls, main=my.files[i]) dev.off() write.csv(temp.dat, paste(Sys.Date(),"_",my.files[i],"_.csv", sep=""), row.names=FALSE) } R says: need finite 'xlim' values In addition: Warning messages: 1: In min(x) : no non-missing arguments to min; returning Inf 2: In max(x) : no non-missing arguments to max; returning -Inf 3: In min(x) : no non-missing arguments to min; returning Inf 4: In max(x) : no non-missing arguments to max; returning -Inf -- View this message in context: http://r.789695.n4.nabble.com/What-s-wrong-with-my-code-tp3662579p3662579.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.