|
|
(٣ مراجعات متوسطة بواسطة نفس المستخدم غير معروضة) |
سطر ٤: |
سطر ٤: |
| 0 & \mbox{sonst}\end{cases}</math> | | 0 & \mbox{sonst}\end{cases}</math> |
| | | |
| <Rform name="cdfhyper"> | | <iframe height="750" k="wiwi" P="mmstat_en/distribution_hyper/" /> |
| n: <input name="n" type="text" size="5" maxlength="5" value="6"> N: <input name="N" type="text" size="5" maxlength="5" value="49"> M: <input name="M" type="text" size="5" maxlength="5" value="6"> <input type="submit" value="Absenden">
| |
| </Rform>
| |
| <R output="html" name="cdfhyper" iframe="width:200px,height:200px;">
| |
| if (exists("M")) M <- as.numeric(M) else M <- 6
| |
| if (exists("N")) N <- as.numeric(N) else N <- 49
| |
| if (exists("n")) n <- as.numeric(n) else n <- 6
| |
| xmin=max(0,M+n-N); xmax=min(n,M)
| |
| dis <- phyper(rep(xmin:xmax,1), M, N-M, n)
| |
| prob <- dhyper(rep(xmin:xmax,1), M, N-M, n)
| |
| m <- cbind(dis,prob)
| |
| dim(m) <- c(xmax-xmin+1,2)
| |
| colnames(m) <- c("F(x)", "P(X=i)")
| |
| rownames(m) <- format(xmin:xmax)
| |
| outHTML(rhtml, m, title="i", format="f", digits=6)
| |
| </R>
| |
المراجعة الحالية بتاريخ ٠٩:٥٠، ١٢ أغسطس ٢٠٢٠
يملك المتغير العشوائي X الذي يحتوي عدد النجاحات A بعد n تكرار للتجربة التوزيع الهندسي مع العناصر M,N و n مع تابع الكثافة الاحتمالي