求教R语言编程

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

有这样一个函数：
fun_12=function(a){
if (a=floor(a))
b<-a
n<-1
else
{
b<-floor(a)
while (b<a)
{
c<-floor((a-b)*10^n)
b<-b+c/10
n<-n+1
}
return(c)
}

现在我想返回c，可是c只在while循环中有效，那么怎么样才能返回c呢????希望高手帮忙解决一下，麻烦了~~~~

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：R语言编程 语言编程 R语言 function floor 语言 求教

首先你的程序里面有错误。
如果你想要c的值，return(c)就可以了。
1# Arphan

1# Arphan
提供一种解决方案，楼主可以在循环的外部（函数体内）先定义c<-numeric()或者任意数值，这样就可以正常的返回c值了。
再提一句题外话，在编辑函数和程序时还是不建议使用R中已经被占用的对象名（包括函数名）作为新对象的name。