我正在为我的在线课程完成一项任务,我必须以两种不同的方式用矢量替换矢量中的所有负值。我有以下向量:
z <- seq(-3.5, 7, by=1.5)
第一种方法是使用abs()
函数:
z <- abs(z)
我正在尝试第二种方法来做同样的事情,也许是使用替换功能或类似的东西。有人可以提出解决方案吗?
答案 0 :(得分:2)
这应该很快:
z<-z*sign(z)
我喜欢akrun的答案,而且计算速度快。为了琐碎的目的,这是一个扭曲:
z<--pmin(-z, z)