
Dear useRs,while trying to plot the yearly curves of 1000 stations and overlapping each set of curves with mean curve and then saving it automatically in a pdf file, i tried the following commands
>Path = "C:\\R\\003.pdf">pdf(file=Path)   for (i in seq(1:1000)      

>a<-lapply(seq_along(tcp), function(x) tcp[[x]][,-1])


>b<-lapply(seq_along(a), function(a) matrix(rowMeans(tcp[[a]]),ncol=1))


>lapply(seq_along(tcp), function(i) (matplot(tcp[[i]][,-1],
type="l",col="grey") )


>lines(b, lwd=2, type="l"))

 } >dev.off()although i was successful in plotting yearly curves of each station, but overlapping them with the mean curves still remains an issue.kindly guide me what kind of improvement is needed in my codes.thanks in advance
regardseliza 		 	   		  
	[[alternative HTML version deleted]]

