Trouble displaying table with renderFormattable in R Shiny

Question

I am working on an R Shiny application to display a table with some conditional formatting. The table displays without formatting when using renderDataTable, ev