From b79895a15d0b167b183d173bc94dc1ba98da0557 Mon Sep 17 00:00:00 2001 From: St33v Date: Sat, 5 Apr 2014 16:02:11 +1100 Subject: Update plot --- plot | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/plot b/plot index 55c6584..5d2e020 100644 --- a/plot +++ b/plot @@ -6,7 +6,7 @@ # ..later.. I like to reduce the size to 80% in MS word - it makes the axis # lables and other writing a bit smaller (I spuppose I could use cex=.8 or somthing) myemf <- function(filename, wdt=15, hgt = 12, pdir=plot_dir, has_title = F){ - if(!exists('plot_dir')) plot_dir <- plotDir() + if(!exists('pdir')) plot_dir <- plotDir() filename <- paste(pdir, '/', filename, '.emf', sep='') win.metafile(file=filename, width=wdt/2.54, height=hgt/2.54) cat('Plotting to', filename, '\n') -- cgit v1.3