cityfreq<-function(area){
a<-as.character(data$city)
city<-c(a)
for(i in 1:length(data$city)){
if(city[i]=="area"){
city[i]<-1
}else{
city[i]<-0
}
}
numcity<-as.numeric(city)
freq<-sum(numcity)
print(freq)
}
cityfreq(Taipei) #预计算的城市
以上是我的程式码,这样是无法得到欲求的结果,想请教一下是否function不能够放欲判读问子项目?仅能做数值运算?
谢谢