r - 当最后一个值为零时如何修剪向量

Question

我有一个看起来像这样的向量：

x <- c(0, runif(3), 0, 0, runif(5), 0, runif(2), rep(0, 10))

我想删除向量末尾的所有零，但不是那些出现在非零值之间的零。最好的方法是什么？

标签： r

Answer 1

试用x[1 : max(which(x != 0))]

 [1] 0.0000000 0.0297684 0.6745141 0.1008348 0.0000000 0.0000000 0.3704074 0.2195432 0.1595944 0.4764559
[11] 0.5712587 0.0000000 0.4233239 0.4611238