commit | a6af5c067c2b4ca8317736f4a3e6c0f7db508fef | [log] [tgz] |
---|---|---|
author | Hao Zhu <haozhu233@gmail.com> | Thu Mar 11 22:28:25 2021 -0500 |
committer | Hao Zhu <haozhu233@gmail.com> | Thu Mar 11 22:28:25 2021 -0500 |
tree | fc057e21afc808eb52596de17df48701284e40b8 | |
parent | 78988919c2dcadb55544e4f1ca72633d3aa55304 [diff] |
Fix #595 as @unDocUMeantIt suggested
diff --git a/R/collapse_rows.R b/R/collapse_rows.R index a32c56e..81c8f97 100644 --- a/R/collapse_rows.R +++ b/R/collapse_rows.R
@@ -85,6 +85,7 @@ 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)) }