Enable sorting for ColReorder by default

rstudio · Nov 15, 2023 · bca0d5b · bca0d5b
1 parent 19004d9
commit bca0d5b
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/datatables.R b/R/datatables.R
@@ -257,6 +257,10 @@ datatable = function(
   if (is.null(options[['autoWidth']])) options$autoWidth = FALSE
   # disable CSS classes for ordered columns
   if (is.null(options[['orderClasses']])) options$orderClasses = FALSE
+  # enable column names for column reordering by default
+  if (is.null(options[['columns']])) {
+    options$columns = lapply(names(data), function(e) list(name = e))
+  }
 
   cn = base::colnames(data)
   if (missing(colnames)) {