我正在使用以下代码来获取“信号”列中我的时间序列之间的差异,并创建一个新列“活动”,其中包含该列。如果信号比 X 强,则在新列中生成 1,如果弱则为 0。因为我正在计算每个值与下一个值之间的差异,显然会比“信号”少一行.
df$Signal <- as.numeric(df$Signal)
Activity <- ifelse(diff(df$Signal)>=4, 1, 0)
Activity <- as.data.frame(Activity)
df <- rbind.fill(df, Activity)
但是,当我使用 rbind.fill 时,它返回 df,新列“Activity”仅包含“NA”。