From 329ddab7946bcb47d50d5a0b28fb4e2dc04f129e Mon Sep 17 00:00:00 2001
From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com>
Date: Wed, 27 May 2026 02:30:22 +0000
Subject: [PATCH 1/2] Initial plan


From d62dfd0d12c99c74b567b220506e15b6ec3ecbac Mon Sep 17 00:00:00 2001
From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com>
Date: Wed, 27 May 2026 02:33:02 +0000
Subject: [PATCH 2/2] fix: correct skewness and kurtosis documentation formulas

---
 R/vec-cumulative-functions.R | 4 ++--
 man/kurtosis_vec.Rd          | 2 +-
 man/skewness_vec.Rd          | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/R/vec-cumulative-functions.R b/R/vec-cumulative-functions.R
index 3d390fc..3c24d17 100644
--- a/R/vec-cumulative-functions.R
+++ b/R/vec-cumulative-functions.R
@@ -363,7 +363,7 @@ crange <- function(.x) {
 #' of that vector. The length of this vector must be at least four numbers. The
 #' kurtosis explains the sharpness of the peak of a distribution of data.
 #'
-#' `((1/n) * sum(x - mu})^4) / ((()1/n) * sum(x - mu)^2)^2`
+#' \deqn{\frac{\frac{1}{n} \sum (x - \mu)^4}{\left(\frac{1}{n} \sum (x - \mu)^2\right)^2}}
 #'
 #' @param .x A numeric vector of length four or more.
 #'
@@ -420,7 +420,7 @@ kurtosis_vec <- function(.x) {
 #' of that vector. The length of this vector must be at least four numbers. The
 #' skewness explains the 'tailedness' of the distribution of data.
 #'
-#' `((1/n) * sum(x - mu})^3) / ((()1/n) * sum(x - mu)^2)^(3/2)`
+#' \deqn{\frac{\frac{1}{n} \sum (x - \mu)^3}{\left(\frac{1}{n} \sum (x - \mu)^2\right)^{3/2}}}
 #'
 #' @param .x A numeric vector of length four or more.
 #'
diff --git a/man/kurtosis_vec.Rd b/man/kurtosis_vec.Rd
index c6ac6aa..cf44a54 100644
--- a/man/kurtosis_vec.Rd
+++ b/man/kurtosis_vec.Rd
@@ -17,7 +17,7 @@ This function takes in a vector as it's input and will return the kurtosis
 of that vector. The length of this vector must be at least four numbers. The
 kurtosis explains the sharpness of the peak of a distribution of data.
 
-\verb{((1/n) * sum(x - mu\})^4) / ((()1/n) * sum(x - mu)^2)^2}
+\deqn{\frac{\frac{1}{n} \sum (x - \mu)^4}{\left(\frac{1}{n} \sum (x - \mu)^2\right)^2}}
 }
 \details{
 A function to return the kurtosis of a vector.
diff --git a/man/skewness_vec.Rd b/man/skewness_vec.Rd
index 0fb5444..7797e85 100644
--- a/man/skewness_vec.Rd
+++ b/man/skewness_vec.Rd
@@ -17,7 +17,7 @@ This function takes in a vector as it's input and will return the skewness
 of that vector. The length of this vector must be at least four numbers. The
 skewness explains the 'tailedness' of the distribution of data.
 
-\verb{((1/n) * sum(x - mu\})^3) / ((()1/n) * sum(x - mu)^2)^(3/2)}
+\deqn{\frac{\frac{1}{n} \sum (x - \mu)^3}{\left(\frac{1}{n} \sum (x - \mu)^2\right)^{3/2}}}
 }
 \details{
 A function to return the skewness of a vector.