一行搞定: datatable(文件名,options = list(scrollX = TRUE)) shiny中的简化版代码框架: #server端 output$变量名 <- renderDT({ datatable(文件名, options = list(scrollX = TRUE))} }) 参考 时间太久记不清了……并且没有搜到直接的解决方法,好像是在别的项目源码里或者stack overflow的代码里搜到的。 重点是用于试错,看到感觉能解决该问题的代码我都试过。