Displaying 1 result from an estimated 1 matches for "pngfn".
Did you mean:
pfn
2009 Apr 29
2
help converting for loop to vector operation
...'line','jitter'), ylab=mlabel, main=mlabel, colour=I("dark blue") )
if ( smooth == TRUE ) {
print("smoother requested...")
tmp <- qmetric
qmetric <- tmp + stat_smooth()
}
pngfn <- paste( BASEPATH, mlabel, ".png", sep="")
print(pngfn)
png( file=pngfn, height=h, width=w )
print(qmetric)
dev.off()
}
basepath <- "C:/tmp"
for ( i in c(2:6) ) {
print(names(economics)[i])
draw_m...