R 随机进行加减运算的函数

我想知道是否有一个函数可以随机进行加法或减法运算：

x +- y

---

问题归结为随机获得

-1

或

1

。您可以使用

sample

获取它：

x + sample(c(-1,1),size=1)*y

或

runif

：

x + sign(runif(n=1,min=-1,max=1))*y

如果

x

和

y

是向量，则可以生成与

x

长度相同的编号序列

-1

和

1

，如@bondedust建议的：

x + sample(c(-1,1),size=length(x),replace=T)*y

---

x+sample（c（-1,1），size=1）*y

@MaratTalipov如果可行，将其作为答案发布。在你的回答中解释它是如何工作的。我将请求解释为满足于：

x+样本（c（-1,1），size=length（x），repl=TRUE）*y

好主意，谢谢@marattalipovan提供反向代码高尔夫的其他机会！：-）

doit…如果你真的想，你可以用你自己的中缀操作符来包装它：
“%rand%”