I am looking for a simple way to take the below pivot table called
tab and adding either a heatmap or some row bars unto the table. I am not sure how best to do this as I don't really want to redraw the whole output into DT and then render it. Any ideas?
library(radiant.data) library(DT) tab <- pivotr(diamonds, cvars = c("clarity", "cut", "color"), nvar = "price", fun = "mean") %>% dtab()