[BioC] [OT] Help to creating a function to automate the plotProfile function in timecourse

[Ido M. Tamir]

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