From c9f7b9f93a7048e06c212b3dad5bf0752e2672f2 Mon Sep 17 00:00:00 2001 From: yvesf Date: Wed, 29 Jun 2011 20:49:35 +0200 Subject: svg device --- test.r | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/test.r b/test.r index 58716e9..5575293 100755 --- a/test.r +++ b/test.r @@ -1,5 +1,6 @@ #!/usr/bin/Rscript --vanilla require(RPostgreSQL) +require(RSvgDevice) nulltime <- strptime("01.01.1970", "%d.%m.%Y") drv <- dbDriver("PostgreSQL") @@ -7,7 +8,8 @@ con <- dbConnect(drv, host="10.2.2.22", user="jack", password="jack", dbname="eb ## plot 1 -png(file = "Rplots.png", width=1500, height=800) +#png(file = "Rplots.png", width=1500, height=800) +devSVG(file="Rplots.svg",width=15,height=10) par(cex=1.25) cat("Starte Abfragen\n") brenner <- dbGetQuery(con, -- cgit v1.2.1