如何以零作为中点创建一个从min到最大的数字序列？

Question

如果我有以下变量。

set.seed(20)
variable <- sample(-74:124.2, size = 38)

如何使用变量的最小值和零作为中点（第3个值）创建5个数字的序列？

seq（）采用启动和结束值，但是有没有办法通过指定中间值来做到这一点？

seq(min(variable), max(variable), length.out = 5)

Answer 1

您可以用指定的值替换生成序列的中间：

seq(min(variable), max(variable), length.out = 5) -> x        
x[which(x == median(x))] <- 0

#-73.00 -25.75   0.00  68.75 116.00

如果length（x）是奇数，则可以使用。

Answer 2

您可以组合两个seq。

c(seq(min(variable), 0, length.out=3), 
  seq(0, max(variable), length.out=3)[-1])
#[1] -73.0 -36.5   0.0  58.0 116.0

这仅在min（variable）＆lt; = 0和max（variable）＆gt; = 0时，才能按预期工作。