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