From 6e9f42cf1cb05fbb943c6e41e4ca9b6f8c0bbfdb Mon Sep 17 00:00:00 2001 From: "Mattan S. Ben-Shachar" Date: Tue, 7 Nov 2023 09:20:05 +0200 Subject: [PATCH] notes [skip] --- R/mahalanobis_D.R | 1 - R/repeated_measures_d.R | 1 + 2 files changed, 1 insertion(+), 1 deletion(-) diff --git a/R/mahalanobis_D.R b/R/mahalanobis_D.R index c7e30eb6..c365b451 100644 --- a/R/mahalanobis_D.R +++ b/R/mahalanobis_D.R @@ -85,7 +85,6 @@ mahalanobis_d <- function(x, y = NULL, data = NULL, pooled_cov = TRUE, mu = 0, ci = 0.95, alternative = "greater", verbose = TRUE, ...) { - # TODO add one sample case DV1 + DV2 ~ 1 # TODO add paired samples case DV1 + DV2 ~ 1 | ID alternative <- .match.alt(alternative, FALSE) data <- .get_data_multivariate(x, y, data, verbose = verbose, ...) diff --git a/R/repeated_measures_d.R b/R/repeated_measures_d.R index 331d79cd..53fcace6 100644 --- a/R/repeated_measures_d.R +++ b/R/repeated_measures_d.R @@ -176,6 +176,7 @@ repeated_measures_d <- function(x, y, out <- data.frame(d = values[["d"]]) if (.test_ci(ci)) { + # TODO use ncp # Add cis out$CI <- ci ci.level <- .adjust_ci(ci, alternative)