r - 从 R 中每个列表的元素中减去值

Question

我需要从 R 中的每个列表元素中减去指定的值。在 this 中文章提到，对于此类任务，apply使用函数族而不是循环。我试过以下:

# Define list
> a = 1:20

# Substraact this from each element
> substract_me = 5

# Function for substracting
> substract = function(x,y) { ret = x-y; return(ret) }

# The problem is that I do not know how to access the current array element and pass it to substract function
lapply(a, substract)

Here提到也可以使用匿名函数，但它对我不起作用，并且出现语法错误。事实上，它在我看来就像语法糖。问题保持不变，我在使用 lapply 时需要一些占位符或其他东西。函数，以便我可以访问当前列表元素:

lapply(a, function([WHAT TO ADD HERE???],substract_me) substract([WHAT TO ADD HERE???],substract_me))

Here可能是相关的，但我没有弄清楚发布的代码片段是如何工作的。

Answer 1

R中的减法向量化

a = 1:20
substract_me = 5
a - substract_me
# [1] -4 -3 -2 -1  0  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15

不需要 apply功能在这里。