【发布时间】:2019-04-03 07:22:30
【问题描述】:
嗨,我有一个数据框
输入:Data$cyclesFromLastError
每次发生错误时都会停止。
输入:
0 1 2 3 4 0 1 2 3 0 1 2 3 4 5
我想创建新列 输出:Data$cyclesToNextError
4 3 2 1 0 3 2 1 0 5 4 3 2 1 0
我需要那个脚本
【问题讨论】:
嗨,我有一个数据框
输入:Data$cyclesFromLastError
每次发生错误时都会停止。
输入:
0 1 2 3 4 0 1 2 3 0 1 2 3 4 5
我想创建新列 输出:Data$cyclesToNextError
4 3 2 1 0 3 2 1 0 5 4 3 2 1 0
我需要那个脚本
【问题讨论】:
我们可以使用ave,在x 和rev每次出现0 时创建组,并为每个组设置序列。
ave(x, cumsum(x == 0), FUN = rev)
#[1] 4 3 2 1 0 3 2 1 0 5 4 3 2 1 0
数据
x <- c(0, 1, 2, 3, 4, 0, 1, 2, 3, 0, 1, 2, 3, 4, 5)
【讨论】: