关于R语言函数返回值得调用

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

我编写了一个函数，如下：
x<-c(36,37,45,52,56,58,66,68,75,90,100)
d1<-(length(x)+1)/2
d2<-(floor(d1)+1)/2
fun_z=function(f){
if (f-floor(f)==0)
{y1<-x[f]
y2<-x[length(x)-f+1]}
else
{y1<-(x[floor(f)]+x[floor(f)+1])/2
y2<-(x[floor(length(x)-f)+1]+x[floor(length(x)-f)+2])/2}
return(y1,y2)
}
z<-fun_z(d2)

得到：
> z
$y1
[1] 48.5
$y2
[1] 71.5


然后我想计算  f<-z[2]-z[1]
就出错了.....

请教高手，帮忙看看为什么会这样啊~~~~~~~~

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 返回值 函数 语言

return(data.frame(y1,y2))或
return(c(y1,y2)) #c(y1,y2)

多谢~~~~~~~~~ 2# miragew