问题:编一个函数。功能是求给定向量中的元素的和
> add<-function(x){
+ sum<-0
+ for(i in x){
+ sum = sum+i
+ }
+ return(sum)
+ }
> x <- c(1,2,3)
> add(x)
[1] 6
问题:编一个函数。功能是求给定向量中的元素的和
> add<-function(x){
+ sum<-0
+ for(i in x){
+ sum = sum+i
+ }
+ return(sum)
+ }
> x <- c(1,2,3)
> add(x)
[1] 6