我正在尝试创建一个颜色条,其中的条是基于一组行值的百分比,即a1 =(a1 + b1)/ 2。然而,我也希望数字格式化为百分比。
我已经尝试过搜索,但找不到其他人有类似的问题。我怀疑有更简单的方法来解决这个问题,但我想不出来。
我已经尝试过搜索,但找不到其他人有类似的问题。我怀疑有更简单的方法来解决这个问题,但我想不出来。
tempDf = data.frame(a=c(0.8,0.5), b=c(0.2,0.5),c=c(500,500)) # dummy data
formattable(tempDf,unlist(list(
lapply(as.list(1:nrow(tempDf)), function(row) {
list(
area(row, 1:2) ~ color_bar('green', function(row) row/sum(row)), # creates the green bars which are based on the percentage a1=(a1+b1)/2
area(row, 1:1) ~ function(x) percent(x, digits = 1) # formats the a row as percent *this overwrites the color bars*
)
})
)))
期望的输出结果是在A列中看到绿色的条形图,同时也以百分比的形式呈现。目前百分比代码会覆盖掉条形图。