r - 最高数字变化的不均匀序列

Question

我生成了很多 map ，其中的中断发生了变化。我想要相同的间隔，但最高数字因 map 而异。我可以使用多个 if，但一定有更好的方法吗？

maxvalues <- c(453, 25)
breaks <- c(0,1,2,5,10,20,50,100,200)

由此我想得到

0,1,2,5,10,20,50,100,200, 453
0,1,2,5,10,25

有什么想法吗？

Answer 1

我们可以遍历“maxvalues”，获取“breaks”中小于它的元素，与“x”连接，然后unlist

unlist(lapply(maxvalues,function(x) c(breaks[breaks< x], x)))
#[1]   0   1   2   5  10  20  50 100 200 453   0   1   2   5  10  20  25