Maintenance in preparation of improvements

- Switch vignette to html
- Switch tests to testthat
- NEWS.md instead of ChangeLog
- Remove names of y in lists returned by lod and loq

2 files changed, 2 insertions, 0 deletions

diff --git a/R/lod.R b/R/lod.R
index 5b74418..bccdf3e 100644
--- a/R/lod.R
+++ b/R/lod.R
@@ -48,6 +48,7 @@ lod.lm <- function(object, ..., alpha = 0.05, beta = 0.05, method = "default", t
     newdata <- data.frame(x = lod.x)
     names(newdata) <- xname
     lod.y <-  predict(object, newdata)
+    names(lod.y) <- NULL
   }
   lod <- list(lod.x, lod.y)
   names(lod) <- c(xname, yname)
diff --git a/R/loq.R b/R/loq.R
index f832265..26d6a53 100644
--- a/R/loq.R
+++ b/R/loq.R
@@ -35,6 +35,7 @@ loq.lm <- function(object, ..., alpha = 0.05, k = 3, n = 1, w.loq = "auto",
   newdata <- data.frame(x = loq.x)
   names(newdata) <- xname
   loq.y <- predict(object, newdata)
+  names(loq.y) <- NULL
   loq <- list(loq.x, loq.y)
   names(loq) <- c(xname, yname)
   return(loq)