Re: übungsaufgabe
Verfasst: Di Apr 27, 2021 8:43 am
Hallo heyoka,
ich verstehe die Aufgabe so:
bzw.
Gruß, Jörg
ich verstehe die Aufgabe so:
Code: Alles auswählen
set.seed(42)
n <- 1000
s2 <- cumsum(sample.int(4, size=n, replace = TRUE)==2)
x <- 1:n
plot((s2/(1:n)) ~ x)
Code: Alles auswählen
set.seed(42)
n <- 1000
s2 <- cumsum(sample.int(4, size=n, replace = TRUE)==2)
plot((s2/(1:n)) ~ I(1:n))