remove extra mat_abbs

Author: Mukulyadav2004

R/print.data.table.R

@@ -142,11 +142,7 @@ print.data.table = function(x, topn=getOption("datatable.print.topn"),
   if (nrow(toprint)>20L && col.names == "auto")
     # repeat colnames at the bottom if over 20 rows so you don't have to scroll up to see them
     #   option to shut this off per request of Oleg Bondar on SO, #1482
-    toprint = rbind(toprint, matrix(if (quote) old else colnames(toprint), nrow=1L), if (isTRUE(class)) {
-      mat_abbs = matrix(abbs, nrow=1L)
-      rownames(mat_abbs) = ""
-      mat_abbs
-    })
+    toprint = rbind(toprint, matrix(if (quote) old else colnames(toprint), nrow=1L), if (isTRUE(class)) matrix(abbs, nrow=1L))
   print_default(toprint)
   invisible(x)
 }