r - 如何在 R 中按顺序有条件地标记行？

Question

我希望根据 sample 的数量是比之前的 sample 多还是少 500 来标记 sample 。我看过条件标签的示例，但找不到适合我需要的示例。

例如我的数据是这样的:

column a
200
230
510
1200
1800
1700
2400

我希望根据每个样本是否彼此接近最多 500 来标记每个样本。因此输出将是:

column a     column b
200            region1
230            region1
510            region1 
1200           region2  #new region starts as there is more than 500 difference than 510 (690)
1400           region2
1700           region2
2400           region3 #new region starts as there is 700 difference from 1700

我看过条件标签的示例，但对于所有这些示例，都有一定数量的标签(例如只有二进制标签)，我需要标签编号(区域编号)随着每个新区域的增加而增加。我怎样才能做到这一点？我尝试过改编其他示例，但我在设置 if more than 500 new label 条件和顺序标记方面几乎没有什么进展。

Answer 1

您可以使用diff 和cumsum

x$b  <-  paste0("region", c(1, 1+cumsum(diff(x$a) > 500)))
x
#     a       b
#1  200 region1
#2  230 region1
#3  510 region1
#4 1200 region2
#5 1800 region3
#6 1700 region3
#7 2400 region4

数据

x  <- data.frame(a=c(200,230,510,1200,1800,1700,2400))