From c0054114ada568a69b6b75bad2fe93ff2d8a0fd2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?F=C3=A9lix=20MARQUET?= Date: Fri, 14 Mar 2025 10:32:00 +0100 Subject: [PATCH] feat: add sortie data and perform Kolmogorov-Smirnov test in R script --- TP_estimateurs/Exercice1.R | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/TP_estimateurs/Exercice1.R b/TP_estimateurs/Exercice1.R index 779925a..b17250d 100644 --- a/TP_estimateurs/Exercice1.R +++ b/TP_estimateurs/Exercice1.R @@ -187,4 +187,7 @@ expected_probs <- diff(pnorm(breaks, mean = moyenne, sd = ecart_type)) # Perform chi-squared test chitest <- chisq.test(observed_counts, p = expected_probs, rescale.p = TRUE) -print(chitest) \ No newline at end of file +print(chitest) + +kstest <- ks.test(poids, "pnorm", mean = moyenne, sd = ecart_type) +print(kstest) \ No newline at end of file