[R]中的x || y与mapply(函数(x,y)x || y,x,y)

时间:2015-04-06 08:02:48

标签: r functional-programming mapply

我认为使用[R]:

我的语法糖问题很少
x=rnorm(1000,mean = 1,sd = 1)
y=rnorm(1000,mean = 1,sd = 1)
x=x>1
y=y>1
x||y
mapply(function(x,y) x||y,x,y)

基本上我想获得一个boolean类型的列表,当x和y中的对应元素为TRUE时,元素为TRUE

但是

x||y

返回标量值TRUE而

mapply(function(x,y) x||y,x,y)

完成这项工作。

那么我在

上出了什么问题
x||y 

语法?

非常感谢...

1 个答案:

答案 0 :(得分:2)

您只需x | y即可获得矢量化结果。 x || y仅将x的第一个元素与y的第一个元素进行比较。

要理解这一点,请考虑以下事项:

TRUE | FALSE
# [1] TRUE
TRUE || FALSE
# [1] TRUE

c(TRUE, FALSE) | c(TRUE, FALSE)
# [1]  TRUE FALSE
c(TRUE, FALSE) || c(TRUE, FALSE) # only first element is compared
# [1] TRUE

c(FALSE, TRUE) | c(FALSE, TRUE)
# [1] FALSE  TRUE
c(FALSE, TRUE) || c(FALSE, TRUE) # only first element is compared
# [1] FALSE
此处不需要

mapply,因为这只是重新创建|的行为:

identical(c(FALSE, TRUE) | c(FALSE, TRUE), mapply(function(x,y) x || y, c(FALSE, TRUE),c(FALSE, TRUE)))
# [1] TRUE
identical(c(TRUE, FALSE) | c(FALSE, TRUE), mapply(function(x,y) x || y, c(TRUE, FALSE),c(FALSE, TRUE)))
# [1] TRUE

mapply的计算成本也高得多:

microbenchmark::microbenchmark(mapply(function(x,y) x||y, x, y), x | y)
Unit: microseconds
                                expr      min       lq       mean   median       uq      max neval cld
 mapply(function(x, y) x || y, x, y) 1495.294 1849.006 2186.77275 2012.776 2237.936 5320.702   100   b
                               x | y   27.713   28.868   39.97163   33.871   38.297  166.657   100  a