如何对另一列的小时数进行近似?

问题描述

如何计算另一列的小时数近似值? 我的代码在几个小时之间增加了四分之一小时。 然后它为变量 P_ESTYM 近似计算这些小时之间的值。 我还想为 P_INST 列添加一个近似值。 怎么做?

aaa <- data.frame(
  time = as.POSIXct(c("2021-05-04 01:00:00","2021-05-04 02:00:00","2021-05-04 03:00:00","2021-05-04 04:00:00","2021-05-04 05:00:00","2021-05-04 06:00:00","2021-05-04 07:00:00","2021-05-04 08:00:00")),P_ESTYM = c(22,11,5,8,22,88,77,7),P_INST = c(2,3,4,9,7,3))
aaa <- aaa %>%
  tidyr::uncount(4) %>%
  mutate(time = seq(min(time),by = "15 min",length.out = n()),P_ESTYM = P_ESTYM * c(1,NA,NA),P_ESTYM = approx(x = time,y = P_ESTYM,xout=time)$y)

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)