Check out https://datatables.net/reference/option/
I think you need
options = list(
paging = TRUE,
pageLength = 5,
columnDefs = list(list(className = "dt-center", targets = "_all"))
)
# https://stackoverflow.com/questions/50912519/select-the-number-of-rows-to-display-in-a-datatable-based-on-a-slider-input/50944393
# https://stackoverflow.com/questions/35749389/column-alignment-in-dt-datatable