Fix #595 as @unDocUMeantIt suggested

haozhu233 · Mar 12, 2021 · a6af5c0 · a6af5c0
1 parent 7898891
commit a6af5c0
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/collapse_rows.R b/R/collapse_rows.R
@@ -85,6 +85,7 @@ collapse_rows_html <- function(kable_input, columns, valign, target) {
   kable_tbody <- xml_tpart(kable_xml, "tbody")
 
   kable_dt <- rvest::html_table(xml2::read_html(as.character(kable_input)))[[1]]
+  kable_dt <- as.data.frame(kable_dt)
   if (is.null(columns)) {
     columns <- seq(1, ncol(kable_dt))
   }