Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/76.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
无法转换';x$date';至第“类;日期”;在R_R_Date - Fatal编程技术网

无法转换';x$date';至第“类;日期”;在R

无法转换';x$date';至第“类;日期”;在R,r,date,R,Date,好吧,我一直在尝试使用Facebook上的这个软件包,但出于某种原因,我一直看到这个错误 library(tidyquant) library(quantmod) library(prophet) library(dplyr) SPY <-tq_get(get = "stock.prices", "SPY", from = "2016-01-01") df<-select(SPY,c(date,close)) df$date <- as.Date(as.character(

好吧,我一直在尝试使用Facebook上的这个软件包,但出于某种原因,我一直看到这个错误

library(tidyquant)
library(quantmod)
library(prophet)
library(dplyr)

SPY <-tq_get(get = "stock.prices", "SPY", from = "2016-01-01")

df<-select(SPY,c(date,close))
df$date <- as.Date(as.character(df$date),format="%Y-%m-%d")
colnames(df)<-c("ds","y")
m<-prophet(df)
future<-make_future_dataframe(m,periods=52, freq = "d")
forecast <- predict(m,future)
plot(m,forecast)
库(tidyquant)
图书馆(quantmod)
图书馆(先知)
图书馆(dplyr)
间谍
库(lubridate)

df$date试一试lubridate
软件包它有很多功能,您正在查找库(anydate):anydate软件包不在CRAN上。对不起,它应该是库(任何时候)
forecast$ds<-as.Date(paste(forecast$ds),"%Y-%m-%d")
forecast$ds<- format(forecast$ds, "%d/%m/%Y")
forecast$date<-forecast$ds
m$date<-forecast$ds
df$newdate<- strptime(as.character(df$ds),"%Y-%m-%d")
df$newdate<- format(df$newdate, "%d/%m/%Y")
df$newdate<-as.Date(df$newdate)
dp<-data.frame(df$newdate,y)
library(lubridate)
df$date <- ymd(df$date) # ymd stands for year, month, date
library(anydate)
df$date <- anydate(df$date)