自定义函数:Calc<-function(x,y,z){z=x*x+y/2+z*z*z
return(z)};a<-"www.tipdm.com.html" pa<-function(x,y){ b<-strsplit(x,'\\.') n<-length(b[[1]])-1 return(b[[1]][n]==y)
群1:897428979
群2:642795722
工作时间:9:00 - 18:00
张老师:18927565259
邮箱: 3120701392@qq.com