update documentation (not done)
diff --git a/R/add_header_above.R b/R/add_header_above.R
index 04e51bd..5716d84 100644
--- a/R/add_header_above.R
+++ b/R/add_header_above.R
@@ -86,7 +86,7 @@
'padding-bottom:0; padding-left:3px;padding-right:3px;',
row_style,
'" colspan="',
- x[2], '"><div style="border-bottom: 1px solid #ddd;padding-bottom: 5px;">',
+ x[2], '"><div style="border-bottom: 1px solid #ddd; padding-bottom: 5px;">',
x[1], '</div></th>')
}
})
diff --git a/R/kableExtra-package.R b/R/kableExtra-package.R
index 6dd0514..4690022 100644
--- a/R/kableExtra-package.R
+++ b/R/kableExtra-package.R
@@ -27,6 +27,10 @@
#' - Only have to mess with raw HTML/LaTeX in the last 10% cases where
#' `kableExtra` cannot solve the problem
#'
+#' For a full package documentation, please visit the
+#' [package documentation site](http://haozhu233.github.io/kableExtra/)
+#' for more information
+#'
#' @section Features:
#' **Pipable syntax:** `kableExtra` is NOT a table generating package. It is a
#' package that can "add features" to a `kable` output using a syntax
diff --git a/R/scroll_box.R b/R/scroll_box.R
index 166545d..9cf85d3 100644
--- a/R/scroll_box.R
+++ b/R/scroll_box.R
@@ -6,12 +6,16 @@
#' @param kable_input A HTML kable object
#' @param height A character string indicating the height of the box, e.g. "50px"
#' @param width A character string indicating the width of the box, e.g. "100px"
+#' @param box_css CSS text for the box
+#' @param extra_css Extra CSS styles
#'
#' @export
-scroll_box <- function(kable_input, height = NULL, width = NULL) {
+scroll_box <- function(kable_input, height = NULL, width = NULL,
+ box_css = "border: 1px solid #ddd; padding: 5px; ",
+ extra_css = NULL) {
kable_attrs <- attributes(kable_input)
out <- as.character(kable_input)
- box_styles <- c()
+ box_styles <- c(box_css, extra_css)
if (!is.null(height)) {
box_styles <- c(box_styles,
paste0("overflow-y: scroll; height:", height, "; "))
diff --git a/R/zzz.R b/R/zzz.R
index a03b2d3..fd83d76 100644
--- a/R/zzz.R
+++ b/R/zzz.R
@@ -5,5 +5,4 @@
usepackage_latex("multirow")
usepackage_latex("xcolor", "table")
usepackage_latex("wrapfig")
-
}