Hi All, I would like to save the firts 500 (1 to 500th) graphs made by plotProfile function in timecourse package in a batch command. The function is: - for gene 1: plotProfile(out2,type="b",gnames=gnames,pch=c("A","B","C"),xlab="Tempo ",ranking=1 - for gene 2: plotProfile(out2,type="b",gnames=gnames,pch=c("A","B","C"),xlab="Tempo ",ranking=2 -for gene 3: plotProfile(out2,type="b",gnames=gnames,pch=c("A","B","C"),xlab="Tempo ",ranking=3 -for gene n: plotProfile(out2,type="b",gnames=gnames,pch=c("A","B","C"),xlab="Tempo ",ranking=n If it is possible, I would like a funtion to save it as .png For each one I know how to do, but for a lot of I don t have any idea. Thank you Marcelo

On Tuesday 18 October 2005 03:22, Marcelo Luiz de Laia wrote: > Hi All, > > I would like to save the firts 500 (1 to 500th) graphs made by > plotProfile function in timecourse package in a batch command. > plotProf <- function( out, gnames, minrank, maxrank ){ for( rnk in minrank:maxrank ){ png(filename=paste("tc_", rnk, ".png", sep="") plotProfile( out, type="b", gnames, pch=c("A","B","C"),xlab="Tempo", ranking=rnk ) dev.off() } hth ido