From 572e4ec9f58ce2d609c93398307c6ae5347efe79 Mon Sep 17 00:00:00 2001 From: Chris Sobczak Date: Fri, 5 Jun 2026 18:23:45 -0700 Subject: Add R package files --- DESCRIPTION | 11 +++++++++++ NAMESPACE | 2 ++ R/gg_csobczak.R | 13 +++++++++++++ 3 files changed, 26 insertions(+) create mode 100644 DESCRIPTION create mode 100644 NAMESPACE create mode 100644 R/gg_csobczak.R diff --git a/DESCRIPTION b/DESCRIPTION new file mode 100644 index 0000000..f4837d1 --- /dev/null +++ b/DESCRIPTION @@ -0,0 +1,11 @@ +Package: rcsobczak +Title: Chris' R Namespace +Version: 0.0.0.9000 +Authors@R: + person("Chris", "Sobczak", , "chris@sobczak.family", role = c("aut", "cre")) +Description: This is a collection of my personal functions. +License: `use_mit_license()`, `use_gpl3_license()` or friends to pick a + license +Encoding: UTF-8 +Roxygen: list(markdown = TRUE) +RoxygenNote: 8.0.0.9000 diff --git a/NAMESPACE b/NAMESPACE new file mode 100644 index 0000000..6ae9268 --- /dev/null +++ b/NAMESPACE @@ -0,0 +1,2 @@ +# Generated by roxygen2: do not edit by hand + diff --git a/R/gg_csobczak.R b/R/gg_csobczak.R new file mode 100644 index 0000000..97448a3 --- /dev/null +++ b/R/gg_csobczak.R @@ -0,0 +1,13 @@ +#' Add Formatting +#' +#' This adds standard formating to my ggplots. +#' @param p A ggplot object to add formatting to. +#' @keywords ggplot plot p +#' @export +#' @examples +#' df <- data.frame(x=rnorm(10), y=rnorm(10)) +#' p <- ggplot(data=df, aes(x=x, y=y)) + geom_point() +#' p <- gg_csobczak(p) +gg_csobczak <- function(p){ + p + theme_classic() +} -- cgit v1.2.3