r - 为 R 中的每个 ID 生成日期和时间序列
问题描述
我试图找出以这种格式创建日期和时间序列的方法:2018-01-01 01:00 到 2018-03-30 01:00 为每个患者,并用随机数填充新的空值。
我的数据看起来像:
Patients temperature
Patient1 37
Patient2 36
Patient3 35.4
我想得到的数据看起来像
Patients temperature Time
Patient1 37 2018-01-01 01:00
Patient2 36 2018-01-01 01:00
Patient3 35.4 2018-01-01 01:00
Patient1 NA 2018-01-01 02:00
Patient2 NA 2018-01-01 02:00
Patient3 NA 2018-01-01 02:00
Patient1 NA 2018-01-01 03:00
Patient2 NA 2018-01-01 03:00
Patient3 NA 2018-01-01 03:00
所以时间变量将是直到 2018-03-30 01:00 并且温度可以是 NA 然后我生成随机数但不重复每个患者的相同温度值。
我试过这个命令但没有用,我不知道如何为每个病人分配时间
Time <- seq (from=as.POSIXct("2018-1-1 01:00"), to=as.POSIXct("2018-3-30 01:00", tz="UTC"), by="hour")
我也尝试了这个命令,但我收到了错误消息:
dt = data.table(ID = Sensor7$StationID,Time = seq (from=as.POSIXct("2018-01-01 02:00"), to=as.POSIXct("2018-03-30 01:00",format = "%Y-%m-%d %H:%M",by="hour")))
但它给了我错误信息:
Error in seq.POSIXt(from = as.POSIXct("2018-01-01 00:00"), to = as.POSIXct("2018-03-30 23:00", :
exactly two of 'to', 'by' and 'length.out' / 'along.with' must be specified
有谁知道如何以我正在寻找的格式获取数据?
解决方案
这是一种方法:
dat = data.frame(Patients=paste0("Patients", 1:3), temperature=c(37,36,35.4))
Time = seq(as.POSIXct("2018-01-01 01:00"), as.POSIXct("2018-03-30 01:00"), by="hour")
new.data = data.frame(
Patient = rep(dat$Patients, each=length(Time)),
Time = rep(Time, length(dat$Patients))
)
我不确定你想如何生成随机值,但这是一个通用方法:
new.data$Random.Temperature = rnorm(nrow(new.data), 35, 1)
推荐阅读
- vba - 在多个工作表中选择相同的范围
- chart.js - ChartJS 2.9.4 无法在水平条形图上叠加线条数据
- function - back4app 解析,如何将用户对象 ID 应用到另一个类指针中
- javascript - Reactjs 相对于其他视图定位视图
- c++ - 为什么我必须重新定义 int main
- docker - dockerswarm 容器链接:“tasks.service1”与直接“service1”
- amazon-s3 - Coldfusion:尝试在 AWS S3 中上传文件
- javascript - Javascript - 循环到具有日期时间数据的数组并检查日期是否在数组内的日期之间
- jmeter - 从 JMeter 采样器或预处理器执行 JMeterPluginsCMD.sh
- firebase - Firebase 数据库中子项的自动递增子项