Fringe is null in dataset

[CamilaAchuri]

Los datos son los siguientes:
https://docs.google.com/spreadsheets/d/1Ro5sLWe6Dz-8Xqhj2BNlyyWTqKXkPBjyPBNXB636GBI/edit#gid=2139997082

Al cargar esta base el resultado del fringe es NULL

library(shiny)
library(hotr)
library(shinypanels)
library(tidyverse)

ui <- panelsPage(
panel(title = "First Panel", color = "chardonnay", collapsed = FALSE, width = 350,
head = NULL,
body = verbatimTextOutput('test'),
footer = NULL
),
panel(title = "Second panel", color = "chardonnay", collapsed = FALSE, width = 350,
head = NULL,
body = uiOutput("dataTable"),
footer = NULL
)
)

server <- function(input, output, session) {

output$dataTable <- renderUI({
d_mex <- read_csv("Desaparecidos en México. Source_ El Universal - desaparecidos-mex_data.csv")
hotr('hot-table', data = d_mex)
})

output$test <- renderPrint(input$hot-table)
}
shinyApp(ui,server)

[brazadas]

@CamilaAchury al parecer a mi me sirve