如何解决在Shiny Export中添加逗号和小数点?
我目前正在使用一个闪亮的应用程序来计算成本,我想知道将昏迷和两个小数点包括在成本中的最佳方法是什么?我尝试添加格式,但这只会产生错误。 以下是我的服务器代码:
server <- shinyServer(function(input,output,session){
output$cost<- renderText({
A <- as.numeric(input$a)
B <- as.numeric(input$b)
C <- as.numeric(input$c)
paste("Your total cost is $",C * ((A * 75.50) + (B * 35.95)))
})
})
解决方法
使用format
函数:
paste("Your total cost is $",format(C * ((A * 75.50) + (B * 35.95)),big.mark = ",",decimal.mark = ".",nsmall = 2))
更新:假设您要保留两位小数,请添加nsmall = 2
。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。