我想计算的平均柱x和y下面，并添加一列Mean，
> z
w x y
1 5 1 1
2 6 2 2
3 7 3 3
4 8 4 0
我使用的代码如下：
z$mean <- rowMeans(subset(z, select = c(x, y)), na.rm = TRUE)
但我不知道如何忽略最后一个y值中的 0 ；该行x和y值的平均值仅为 4。
所需的输出：
> z
w x y mean
1 5 1 1 1
2 6 2 2 2
3 7 3 3 3
4 8 4 0 4