有没有一种简单的方法可以对R中的向量中的元素执行算术运算？

问题描述

输入可以是数字矢量或字符串，而输出是数字1的加法加上该元素在数字字符串中的位置。

myFunciton(c(4,10))
[1] 5,12
myFunction(1:10)
[1] 2,4,6,8,10,12,14,16,18,20 

解决方法

您可以使用：

myfunction <- function(x) x + seq_along(x)

myfunction(c(4,10))
#[1]  5 12
myfunction(1:10)
#[1]  2  4  6  8 10 12 14 16 18 20