关于编写的函数结果小数位保留的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

下面是我编写的函数，想将结果保留两位小数，编写的函数中使用了sprintf()函数，并将结果返回为一个数据框，输出到一个文本文档中，但是所得的数据小数位并不是两位数，求指点，谢谢！LD是个数据框
L.function=function(LD){
LD$EquipmentGroup=factor(LD$EquipmentGroup)
LD$A=NULL
LD$B=NULL
LD$A=LD$Pn*LD$Kx
LD$B=LD$A*LD$tanφ
write.table(LD,file="Results.txt",sep=";",quote=FALSE,append=FALSE,na="NA")
SumPn=sum(LD$Pn,na.rm=TRUE)
SumA=sum(LD$A,na.rm=TRUE)
SumB=sum(LD$B,na.rm=TRUE)
C=SumA/SumB
sprintf("%.2f,%.2f,%.2f,%.2f",SumPn,SumA,SumB,C)
data.frame(SumPn=SumPn,SumA=SumA,SumB=SumB,C=C)
}

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Equipment function Equipme results SPRINT function factor file