r语言 - 按日期指定不同行的数据帧

Question

我想将包含日期的数据框组合在一个列表中。列表中的第一个数据帧代表整个观测周期，下半部分为不同类型观测的日期。

start_date <- as.Date("2017/01/01")
original = as.data.frame (seq(start_date, by = "day", length.out = 365))
set.seed(5)
sub1 = original[-sample(1:365, 100, replace=FALSE),]
set.seed(4)
sub2 = original[-sample(1:365, 30, replace=FALSE),]
list(original, sub1, sub2.....)

我想创建一个单一的数据帧，实际上包含整个列表。潜艇上缺失的日期应该是NA。

Answer 1

这样可以。

colnames(original) <- "date"
head(cbind(original,
sub1 = ifelse(original[,1] %in% sub1, as.character(original[,1]), NA),
sub2 = ifelse(original[,1] %in% sub2, as.character(original[,1]), NA)),
10)
date       sub1       sub2
1  2017-01-01 2017-01-01 2017-01-01
2  2017-01-02 2017-01-02 2017-01-02
3  2017-01-03       <NA> 2017-01-03
4  2017-01-04       <NA> 2017-01-04
5  2017-01-05 2017-01-05 2017-01-05
6  2017-01-06 2017-01-06 2017-01-06
7  2017-01-07 2017-01-07 2017-01-07
8  2017-01-08       <NA> 2017-01-08
9  2017-01-09       <NA> 2017-01-09
10 2017-01-10 2017-01-10 2017-01-10