使用DT格式化列%

时间:2018-09-04 15:15:31

标签: r shiny dt

我直接从DT格式列文档中选择了这个示例

library(DT)
m = cbind(matrix(rnorm(60, 1e5, 1e6), 20), runif(20), rnorm(20, 100))
m[, 1:3] = round(m[, 1:3])
m[, 4:5] = round(m[, 4:5], 7)
colnames(m) = head(LETTERS, ncol(m))
head(m)



##            A        B        C         D         E
## [1,] -460476  -967824  -594707 0.6478935  99.50897
## [2,] -130177  -117975  -107917 0.3198206  97.69083
## [3,] 1658708  -926004 -1165396 0.3077200 101.00574
## [4,]  170508  -628891  2268956 0.2197676  99.29080
## [5,]  229288  -525039  1307962 0.3694889  99.31199
## [6,] 1815065 -1586693 -1023109 0.9842192 101.02557


# format the columns A and C as currency, and D as percentages
datatable(m) %>% formatCurrency(c('A', 'C')) %>% formatPercentage('D', 2)

现在您可以在上方看到D的值以十进制表示,然后使用formatPercentage进行格式化。

现在,我想使用滑块输入,以便可以过滤表。但是,如果我分别使用最小最大值为20和40,它将无法工作,但是当我选择最小最大值为0.2和0.4时,它将起作用。所以我的滑块范围是0.1到0.9。

 sliderInput("range_value",    
label = h3("Put a range value"),
                         min = 20,
                         max = 40,post  = " %",
                          value = c(20, 40)


                    )

如何将滑块范围显示为10%到100%,最小和最大值分别为20和40

0 个答案:

没有答案