From 42739646dc36ff74d43b638fc2c4f5259496e2b9 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Sat, 21 Feb 2015 06:56:35 +0100 Subject: Avoid NOTES in R CMD check - Export S3 methods - Avoid using undeclared variable names --- NAMESPACE | 3 +++ NEWS.md | 2 ++ R/mkinparplot.R | 2 +- 3 files changed, 6 insertions(+), 1 deletion(-) diff --git a/NAMESPACE b/NAMESPACE index dfa9e9bb..4774475e 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -1,5 +1,8 @@ # Export all names exportPattern(".") +S3method(plot, mkinfit) +S3method(summary, mkinfit) +S3method(print, summary.mkinfit) # Import all packages listed as Imports or Depends import( diff --git a/NEWS.md b/NEWS.md index c8284175..1caaa148 100644 --- a/NEWS.md +++ b/NEWS.md @@ -4,6 +4,8 @@ - `mkinparplot()`: Avoid warnings that occurred when not all confidence intervals were available in the summary of the fit - `print.summary.mkinfit()`: Fix printing the summary for the case that the number of iterations is not available +- NAMESPACE: export S3 methods plot.mkinfit, summary.mkinfit and print.summary.mkinfit to satisfy R CMD check on R-devel +- `mkinparplot()`: Avoid warning in R CMD check about undeclared global variable `Lower` ## NEW FEATURES diff --git a/R/mkinparplot.R b/R/mkinparplot.R index 53354db7..a5e8fb89 100644 --- a/R/mkinparplot.R +++ b/R/mkinparplot.R @@ -39,7 +39,7 @@ mkinparplot <- function(object) { for (type in names(n.plot)) { parnames <- get(type) values <- bpar[parnames] - values_with_confints <- data.frame(t(subset(data.frame(t(values)), !is.na(Lower)))) + values_with_confints <- data.frame(t(subset(data.frame(t(values)), !is.na("Lower")))) xlim = switch(type, state.optim = range(c(0, unlist(values)), na.rm = TRUE, finite = TRUE), -- cgit v1.2.1