Al crear undatatable confilter = 'top' y también usando una función de formato en una columna, el formato no se aplica al control de filtro para esa columna. ¿Hay alguna forma de formatear los controles de filtro también?

Por ejemplo, si tengo números de punto flotante formateados como un porcentaje, el control deslizante en el filtro aún muestra números de punto flotante.

library(DT)

my_data <- mtcars
my_data$wt_pctile <- trunc(rank(my_data$wt)) / length(my_data$wt)

datatable(my_data,
          filter = 'top') %>%
  formatPercentage('wt_pctile')