aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--DESCRIPTION6
-rw-r--r--R/drfit.R4
2 files changed, 5 insertions, 5 deletions
diff --git a/DESCRIPTION b/DESCRIPTION
index d8b55a7..c9de7dc 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,10 +1,10 @@
Package: drfit
-Version: 0.03-26
-Date: 2005-07-07
+Version: 0.03-27
+Date: 2005-07-16
Title: Dose-response data evaluation
Author: Johannes Ranke <jranke@uni-bremen.de>
Maintainer: Johannes Ranke <jranke@uni-bremen.de>
-Depends: R,stats,RODBC
+Depends: R (>=2.1.0),stats,RODBC
Description: drfit provides basic functions for fitting dose-response curves to
dose-response data, calculating some (eco)toxicological parameters and
plotting the results. Functions that are fitted are the cumulative densitiy
diff --git a/R/drfit.R b/R/drfit.R
index 59deb6a..db7bf50 100644
--- a/R/drfit.R
+++ b/R/drfit.R
@@ -335,7 +335,7 @@ drplot <- function(drresults, data, dtype = "std", alpha = 0.95,
xlab=paste("Decadic Logarithm of the dose in ", unit),
ylab="Normalized response")
}
- if (!overlay) legend(lx, ly, i,lty = 1, col = color)
+ if (!overlay) legend("topright", i,lty = 1, col = color, inset=0.05)
tmp$dosefactor <- factor(tmp$dose) # necessary because the old
# factor has all levels, not
# only the ones tested with
@@ -402,7 +402,7 @@ drplot <- function(drresults, data, dtype = "std", alpha = 0.95,
}
}
}
- if (overlay) legend(lx, ly, dsubstances,lty = 1, col = colors)
+ if (overlay) legend("topright", dsubstances,lty = 1, col = colors, inset=0.05)
if (overlay && (postscript || png)) {
if (devoff) {
dev.off()

Contact - Imprint