我是一个绝对的R初学者。我的目标是生成一个数据表,x值为日期格式,y值为浮点格式。这些值是通过使用splinefun()进行插值生成的。生成样条函数后,我希望我的值显示在一个表中,这导致了我的代码错误。
library(ggplot2)
dat <- data.frame(x = as.Date(c("2000-01-01","2000-02-01","2000-03-01","2000-04-01"), format ="%Y-%m-%d"),
y = c(1000,1500,4000,2000))
f <- splinefun(dat$x, dat$y, method = "monoH.FC")
f <- data.frame(x = seq.Date(from = as.Date("2000-01-01"), to= as.Date("2000-04-01"), by = "day"), y = f(seq.Date(from = as.Date("2000-01-01"), to= as.Date("2000-04-01"), by = "day")))
f
data.frame(x=..., y =f(seq.Date(...))
中y的格式似乎有问题。我得到错误
Error in Ops.Date(m[n], (x[iR] - x0[n])) :
* not defined for "Date" objects
1条答案
按热度按时间e4eetjau1#
可以使用y的值来执行
splinefun
的值,如下所示:创建于2023年1月5日,使用reprex v2.0.2