Merge pull request #20 from emitanaka/master

theme_strip() + dependency fix
dicook · Jul 5, 2022 · 0f8f3d8 · 0f8f3d8
2 parents 2e23835 + 086c404
commit 0f8f3d8
Show file tree

Hide file tree

Showing 5 changed files with 69 additions and 1 deletion.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -35,5 +35,5 @@ LazyData: true
 Type: Package
 LazyLoad: false
 VignetteBuilder: knitr
-RoxygenNote: 7.1.1
+RoxygenNote: 7.1.2
 Encoding: UTF-8
diff --git a/NAMESPACE b/NAMESPACE
@@ -22,6 +22,7 @@ export(resid_sigma)
 export(rorschach)
 export(sample_size)
 export(sep_dist)
+export(theme_strip)
 export(uni_dist)
 export(visual_power)
 import(fpc)

diff --git a/R/theme.R b/R/theme.R
@@ -0,0 +1,17 @@
+
+
+#' A theme to minimally strip away the context
+#'
+#' Note this is not a complete theme hence why there are no arguments.
+#'
+#' @examples
+#' library(ggplot2)
+#' ggplot(cars, aes(dist, speed)) + theme_strip()
+#'
+#' @export
+theme_strip <- function() {
+ ggplot2::theme(axis.title = ggplot2::element_blank(),
+ axis.text = ggplot2::element_blank(),
+ axis.ticks.length = grid::unit(0, "mm"))
+
+}
diff --git a/man/sample_size.Rd b/man/sample_size.Rd
diff --git a/man/theme_strip.Rd b/man/theme_strip.Rd