library(tidyverse) library(DT) datatable(mpg, options = list(scrollX = TRUE))