Difference between revisions of "User:Admin"
From HodHood
(Created page with "<R>1:11</R>") |
|||
| Line 1: | Line 1: | ||
<R>1:11</R> | <R>1:11</R> | ||
| + | |||
| + | <R output="display" name="binom" iframe="height:400px;"> | ||
| + | if (exists("prob")) prob <- as.numeric(prob) else prob <- 0.2 | ||
| + | if (exists("n")) n <- as.numeric(n) else n <- 10 | ||
| + | x <- seq(0, n, 1) | ||
| + | p <- dbinom(x, n, prob) | ||
| + | param <- list(n, prob) | ||
| + | main <- c("Binomialverteilung - Wahrscheinlichkeitsfunktion", | ||
| + | paste (c("Stichprobenumfang n", "Wahrscheinlichkeit p"), param, sep="=")) | ||
| + | pdf(pdf, width=5, height=5) | ||
| + | plot(x,p, type="h", main=main) | ||
| + | </R> | ||
Revision as of 03:44, 28 December 2016
[1] 1 2 3 4 5 6 7 8 9 10 11