Difference between revisions of "User:Admin"

From HodHood
Jump to: navigation, search
(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