X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2FR%2FgetForecast.R;h=8efcff8da70a7c8b13f40958dc8cced50fada203;hb=44a9990b6d608ffcd2e99d5193fa8b9e6cbdb436;hp=06c2415c1a7b406b88d98e13bb767ac947a3abfa;hpb=1e20780ee1505fac6c7ed68d340892c497524561;p=talweg.git

diff --git a/pkg/R/getForecast.R b/pkg/R/getForecast.R
index 06c2415..8efcff8 100644
--- a/pkg/R/getForecast.R
+++ b/pkg/R/getForecast.R
@@ -10,7 +10,6 @@
 #'   \item Neighbors : use values from the k closest neighbors' tomorrows
 #'   \item Average : global average of all the (similar) "tomorrow of past"
 #'   \item Zero : just output 0 (benchmarking purpose)
-#'   \item Level : output a flat serie repeating the last observed level
 #' }
 #' @param pjump How to predict the jump at the interface between two days ?
 #' \itemize{
@@ -25,8 +24,10 @@
 #' @return An object of class Forecast
 #'
 #' @examples
-#' data = getData(ts_data="data/pm10_mesures_H_loc.csv", exo_data="data/meteo_extra_noNAs.csv",
-#'   input_tz = "Europe/Paris", working_tz="Europe/Paris", predict_at=7)
+#' ts_data = system.file("extdata","pm10_mesures_H_loc.csv",package="talweg")
+#' exo_data = system.file("extdata","meteo_extra_noNAs.csv",package="talweg")
+#' data = getData(ts_data, exo_data, input_tz = "Europe/Paris",
+#'   working_tz="Europe/Paris", predict_at=7)
 #' pred = getForecast(data, 2200:2230, "Persistence", "Persistence", 500, 12)
 #' \dontrun{#Sketch for real-time mode:
 #' data = new("Data", ...)