thanks, it works. best, Alex
On Fri, 10 Feb 2006, Prof Brian Ripley wrote: > Most likely this is FAQ 7.22. > > althogh how we are supposed to know what plotHeatTrellis does is beyond > me. > > On Fri, 10 Feb 2006, [EMAIL PROTECTED] wrote: > > > > > > > Hello: > > > > I have problems generating big JPG plots in functions. the following code > > runs > > fine in the script: > > > > #### runs fine in script, generate 40k "test1.jpg" in the given directory > > plotPlatesAlong <- c(1:5) > > plotDirPath <- paste(dataPath, "OutputPlots\\", sep="") > > filename <- paste(plotDirPath,"test1.jpg", sep="") > > jpeg(file=filename) > > plotHeatTrellis(dataPath, plotVariable = "Raw", plotPlatesAlong) > > # here plotHeatTrellis() generates a complicate plot, but it works > > dev.off() > > #### End of script > > > > > > but if I wrap it in a function, it doesn't work. > > > > ######## put it in a function and run test(dataPath) > > ######## it will make "test1.jpg" in the given directory, but only 6k in > > size > > ######## and if I open the file, it's blank > > test <- function(dataPath) { > > plotPlatesAlong <- c(1:5) > > plotDirPath <- paste(dataPath, "OutputPlots\\", sep="") > > filename <- paste(plotDirPath,"test1.jpg", sep="") > > jpeg(file=filename) # > > plotHeatTrellis(dataPath, plotVariable = "Raw", plotPlatesAlong) > > dev.off() > > } > > ######### enf of the program > > > > > > I've tested the simple plot function, like > > > > ########## works fine both with in script and function wrapping format > > testplot <- function(plotDirPath) { > > filename1 <- paste(plotDirPath, "test1.jpg",sep="") > > jpeg(file=filename1) > > plot(1:10, rnorm(10, 0), type="b") > > dev.off() > > } > > ########### > > > > Any one have any clues, why this happen and how could I fix my code and my > > mine > > working also in the function wrapping format? Thanks. > > > > > > best, Alex > > > > ______________________________________________ > > R-help@stat.math.ethz.ch mailing list > > https://stat.ethz.ch/mailman/listinfo/r-help > > PLEASE do read the posting guide! > > http://www.R-project.org/posting-guide.html > > > > -- > Brian D. Ripley, [EMAIL PROTECTED] > Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/ > University of Oxford, Tel: +44 1865 272861 (self) > 1 South Parks Road, +44 1865 272866 (PA) > Oxford OX1 3TG, UK Fax: +44 1865 272595 > ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html