From 5bd6a056b9f1e48a331fcd0967e7d8636bb7743b Mon Sep 17 00:00:00 2001 From: Szymon P Date: Tue, 21 Apr 2026 09:34:20 +0200 Subject: [PATCH] fix --- .../matematyka_stosowana/laby/podumowanie_do_6.R | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/uczelnia/2_semestr/matematyka_stosowana/laby/podumowanie_do_6.R b/uczelnia/2_semestr/matematyka_stosowana/laby/podumowanie_do_6.R index d1fa483..791ab69 100644 --- a/uczelnia/2_semestr/matematyka_stosowana/laby/podumowanie_do_6.R +++ b/uczelnia/2_semestr/matematyka_stosowana/laby/podumowanie_do_6.R @@ -229,12 +229,15 @@ n = 2000 p = 0.002 q = 1 - p -sum(dbinom(5:12, n, p)) +sum(dbinom(6:12, n, p)) if (n >= 50 & n * p <= 10) { - sum(dpois(5:12, n * p)) + sum(dpois(6:12, n * p)) } +p = q +q = 0.002 -sum(dbinom(1992:2000, n, p, F)) +sum(dbinom(1992:2000, n, p)) +pnorm(1992, n * p, sqrt(n * p * q), F)