2.10 Escaping Table Content
The argument escape determines whether the HTML entities in the table are escaped or not. There can be potential security problems when the table is rendered in dynamic web applications such as Shiny if you do not escape them.
therefore in your code changing
to
output$TabBU <- renderDT(
datatable(values,
escape = FALSE))
