for循环语句:
x<-1:200
count<-function(x){ count1<-0 for(i in 1:length(x)){ if(x[i]%%2==1){ count1<-count1+1 } } return(count1) } count(x)
count2<-function(x){ cou<-sum(x%%2==1) return((cou)) } count2(x)
群1:897428979
群2:642795722
工作时间:9:00 - 18:00
张老师:18927565259
邮箱: 3120701392@qq.com