在 Shiny r 中以美元显示数据表列值

Displaying datatable column values in dollars in Shiny r

我有一个数据table,其中一列应以美元表示,一些应以百分比表示。我一直在环顾四周,但我仍然不确定该怎么做 - 看起来很容易?

更棘手的部分是我有另一个数据 table 其中只有某些条目需要表示为美元(即不是整行或整列)- 有没有办法处理这个问题?

假设您的数据表 (myData) 是 2 列乘 10 行。

您希望第二行以美元为单位:

myData[,2]<-sapply(myData[,2],function(x) paste0("$",x))

或者,您希望第一列中的第 6 行到第 10 行是百分比:

myData[6:10,1]<-sapply(myData[6:10,1],function(x) paste0(x,"%"))

或者,您希望第二列中的第 1 行到第 5 行以美元为单位,您可以这样做:

myData[1:5,2]<-sapply(myData[1:5,2],function(x) paste0("$",x))