/
.Rhistory
38 lines (38 loc) · 1.22 KB
/
.Rhistory
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
setwd("C:/Users/Evandeilton/Dropbox/cvforecast2017")
library(roxygen2)
roxygenize("cvforecast")
system("R CMD build cvforecast")
system("R CMD INSTALL --build cvforecast")
system("R CMD check cvforecast")
setwd("C:/Users/Evandeilton/Dropbox/cvforecast2017")
## Documentação
library(roxygen2)
roxygenize("cvforecast")
system("R CMD build cvforecast")
system("R CMD INSTALL --build cvforecast")
system("R CMD check cvforecast")
remove.packages("cvforecast")
devtools::install_github('evandeilton/cvforecast')
remove.packages("cvforecast")
devtools::install_github('evandeilton/cvforecast')
require(cvforecast)
?cvforecast
x <- ForecastHorizon(rnorm(100), 'day',20)
str(x)
data(datasample, package = "cvforecast")
y <- ConvertData(datasample[,1:2], tsfrequency = "day", OutType = "xts")
y <- ForecastHorizon(y, 'day', 20)
fc_auto.arima(y, 5)
y
fc_auto.arima(y$``, 5)
fc_auto.arima(y[[1]], 5)
data(datasample)
d1 <- cvforecast::ConvertData(datasample, tsfrequency = "day", OutType = "xts", OutlierClean = FALSE)
fun1 <- function(x) {c(mean(x, na.rm=TRUE) + sd(x,na.rm=TRUE))}
aggreg(d1[,1:5], fun1, "monthly")
aggreg(d1[,1:5], mean, "monthly")
aggreg(d1[,1:5], fun1, "monthly")
aggreg(d1[,1:5], fun1, "weekly")
require(devtools)
getwd()
use_travis()