diff options
| author | ranke <ranke@d1b72e20-2ee0-0310-a1c4-ad5adbbefcdc> | 2005-10-11 15:08:27 +0000 |
|---|---|---|
| committer | ranke <ranke@d1b72e20-2ee0-0310-a1c4-ad5adbbefcdc> | 2005-10-11 15:08:27 +0000 |
| commit | 58db0771b52ee9278c3af9b91a7f00c7eb9a2952 (patch) | |
| tree | 135a63a50191f28929e17127355ea9bda2c1dc16 | |
| parent | ee394477d6bebefbab09a9ee6d2fac11be0f1d57 (diff) | |
Go back to the png device, since we get problems with "(" and ")" in the
filenames with ghostscript.
git-svn-id: http://kriemhild.uft.uni-bremen.de/svn/drfit@45 d1b72e20-2ee0-0310-a1c4-ad5adbbefcdc
| -rw-r--r-- | DESCRIPTION | 2 | ||||
| -rw-r--r-- | R/drfit.R | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/DESCRIPTION b/DESCRIPTION index e0ed35e..07ea94d 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,5 +1,5 @@ Package: drfit -Version: 0.04-44 +Version: 0.04-45 Date: 2005-10-11 Title: Dose-response data evaluation Author: Johannes Ranke <jranke@uni-bremen.de> @@ -318,8 +318,8 @@ drplot <- function(drresults, data, dtype = "std", alpha = 0.95, } if (png) { filename = paste(path,fileprefix,".png",sep="") - bitmap(file=filename,type="png256",res=72, - width=6, height=6, pointsize=pointsize) + png(filename=filename, + width=500, height=500, pointsize=pointsize) cat("Created File: ",filename,"\n") } if (!postscript && !png) { @@ -355,8 +355,8 @@ drplot <- function(drresults, data, dtype = "std", alpha = 0.95, } if (png) { filename = paste(path,fileprefix,sub(" ","_",i),".png",sep="") - bitmap(file=filename,type="png256",res=72, - width=6, height=6, pointsize=pointsize) + png(filename=filename, + width=500, height=500, pointsize=pointsize) cat("Created File: ",filename,"\n") } if (!postscript && !png) { |