如何让这个函数适用于包含多个元素的向量?
above10<-function(x){
if(x>10) print(x)
}
答案 0 :(得分:3)
我们可以使用[
来获得大于10的数字,这些数字适用于单个元素和多个元素
above10 <- function(x) {
print(x[x > 10])
}
above10(11)
#[1] 11
above10(6:12)
#[1] 11 12
答案 1 :(得分:0)
建议使用lapply
x <- seq(1:20)
lapply(x,FUN= above10)
答案 2 :(得分:0)
使用for循环
above10<-function(x){
for(i in seq_along(x))
if(x[i]>10)
print(x[i])
}