2
반짝이는 데이터 테이블을 만들려고합니다. 이 솔루션은 이전에 일하고있다하지만 난 더이상 그것을 위해 무언가를 변경해야합니다 :데이터 테이블이 반짝이는 렌더링되지 않습니다.
output$ltl_tbl <- renderDataTable({
input$refresh
ltl_view <- car()
colnames(ltl_view) <- c('Carrier', 'Volume', 'CWT', 'On Time')
DT::datatable(ltl_view,
options = list(lengthMenu = c(10, 25, 50),
pageLength = 10,
orderClasses = TRUE,
fillContainer = TRUE,
searching = FALSE),
rownames = FALSE
) %>%
formatCurrency(3, '$') %>% formatPercentage(4, 0) %>% formatCurrency(2, '', digits= 0)
})
난 그냥 다음 몇 가지 옵션 만이 가진 데이터 테이블을 생성, 열 이름을 변경, 반응성 기능에서 dataframe를 호출하고 왜 작동하지 않는 나는 이유를 알아낼 수 없습니다.
format (formatCurrency & formatPercentage)을 제거하고 실제 데이터 테이블 위의 행 (예 : 열 이름 및 데이터 프레임 할당 변경)을 제거하면 내 shinyapp에 데이터 테이블이 렌더링됩니다.