From: Benjamin Auder Date: Fri, 14 Apr 2017 22:34:53 +0000 (+0200) Subject: fix package X-Git-Url: https://git.auder.net/variants/current/doc/css/scripts/pieces/index.css?a=commitdiff_plain;h=b58167f0785d6545caf2ed887720344e8ad2acd8;p=talweg.git fix package --- diff --git a/pkg/R/A_NAMESPACE.R b/pkg/R/A_NAMESPACE.R index 466293c..fa0b0e5 100644 --- a/pkg/R/A_NAMESPACE.R +++ b/pkg/R/A_NAMESPACE.R @@ -2,7 +2,7 @@ #' @importFrom graphics abline hist par plot #' @importFrom methods hasArg is #' @importFrom stats quantile sd -#' @importFrom utils getFromNamespace read.csv tail +#' @importFrom utils getFromNamespace read.csv head tail #' @importFrom R6 R6Class #' #' @include Data.R diff --git a/pkg/R/Data.R b/pkg/R/Data.R index 3820d57..c2222e1 100644 --- a/pkg/R/Data.R +++ b/pkg/R/Data.R @@ -9,7 +9,7 @@ #' \code{getTime()} below. Each cell .data[[i]] is itself a list containing five slots, #' as described in the 'field' section. #' -#' @usage data <- Data$new() +#' @usage Data$new() #' #' @field .data[[i]] List of #' \itemize{ diff --git a/pkg/R/F_Average.R b/pkg/R/F_Average.R index a1f29ad..72a79f0 100644 --- a/pkg/R/F_Average.R +++ b/pkg/R/F_Average.R @@ -7,7 +7,7 @@ #' averaged to provide a smooth prediction. This forecast will most of the time be wrong, #' but will also look plausible enough. #' -#' @usage f <- AverageForecaster$new(pjump) +#' @usage AverageForecaster$new(pjump) #' #' @docType class #' @format R6 class, inherits Forecaster diff --git a/pkg/R/F_Neighbors.R b/pkg/R/F_Neighbors.R index 51b5730..0003e08 100644 --- a/pkg/R/F_Neighbors.R +++ b/pkg/R/F_Neighbors.R @@ -28,7 +28,7 @@ #' obtain the final prediction. #' } #' -#' @usage f <- NeighborsForecaster$new(pjump) +#' @usage NeighborsForecaster$new(pjump) #' #' @docType class #' @format R6 class, inherits Forecaster diff --git a/pkg/R/F_Persistence.R b/pkg/R/F_Persistence.R index 3eefa5b..a5a95d0 100644 --- a/pkg/R/F_Persistence.R +++ b/pkg/R/F_Persistence.R @@ -8,7 +8,7 @@ #' If the last similar day has missing values, the next one is searched, and so on until #' one full serie is found (if no one is found, NA is returned). #' -#' @usage f <- PersistenceForecaster$new(pjump) +#' @usage PersistenceForecaster$new(pjump) #' #' @docType class #' @format R6 class, inherits Forecaster diff --git a/pkg/R/F_Zero.R b/pkg/R/F_Zero.R index dae43e8..d553807 100644 --- a/pkg/R/F_Zero.R +++ b/pkg/R/F_Zero.R @@ -3,7 +3,7 @@ #' Flat prediction: always forecast a serie of zeros. #' This serie is then adjusted using the ".pjump" function (see \code{Forecaster} class). #' -#' @usage f <- ZeroForecaster$new(pjump) +#' @usage ZeroForecaster$new(pjump) #' #' @docType class #' @format R6 class, inherits Forecaster diff --git a/pkg/R/Forecast.R b/pkg/R/Forecast.R index bb665bd..2bc77c6 100644 --- a/pkg/R/Forecast.R +++ b/pkg/R/Forecast.R @@ -9,7 +9,7 @@ #' Each cell .pred[[i]] is itself a list containing three slots, as described in the #' 'field' section. #' -#' @usage f <- Forecast$new(dates) +#' @usage Forecast$new(dates) #' #' @field .pred List with #' \itemize{ diff --git a/pkg/R/Forecaster.R b/pkg/R/Forecaster.R index ce1bb35..bb32a5e 100644 --- a/pkg/R/Forecaster.R +++ b/pkg/R/Forecaster.R @@ -9,7 +9,7 @@ #' serie, and then calls the "jump prediction" function -- see "field" section -- to #' adjust it based on the last observed values. #' -#' @usage f <- Forecaster$new(pjump) #warning: predictShape() is unimplemented +#' @usage Forecaster$new(pjump) #warning: predictShape() is unimplemented #' #' @field .params List of computed parameters (if applicable). #' @field .pjump Function: how to predict the jump at day interface? The arguments of diff --git a/pkg/tests/testthat.R b/pkg/tests/testthat.R index 97e5ad5..e9572c7 100644 --- a/pkg/tests/testthat.R +++ b/pkg/tests/testthat.R @@ -1,6 +1,6 @@ library(testthat) -load_all() #because some non-exported functions +library(devtools); load_all("..") #because some non-exported functions #library(talweg) test_check("talweg")