inst/examples/R/stat/GrundbegriffeSchaetztheorie/Schätzwerte_Haushalt_3_100.R
In sigbertklinke/shinyExample: Create and run simple (interactive) programs as Shiny apps
set.seed(1)
Einkommen <- rnorm(100, 2362, 150)
Nr <- c(1:100)
par(las=1)
plot(Einkommen, Nr, pch=16, col="blue", xlab="mittleres Haushaltsnettoeinkommen", font.lab=2, bty="l", ylab="Nr. der Stichprobe", xaxt="n", xlim=c(2000, 2800), "xaxs"="i", ylim=c(0,110), yaxp=c(0, 110, 11), "yaxs"="i", sub="Abb. 3: Sch\u00E4tzwerte von 100 Zufallsstichproben des Stichprobenumfangs n = 100")
axis(at=c(2000, 2200, 2400, 2600, 2800), side=1, tick=TRUE, labels=TRUE, lwd.ticks=2)
abline(v=2362, lwd=6, lty=2)
sigbertklinke/shinyExample documentation built on May 26, 2019, 4:32 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
set.seed(1)
Einkommen <- rnorm(100, 2362, 150)
Nr <- c(1:100)
par(las=1)
plot(Einkommen, Nr, pch=16, col="blue", xlab="mittleres Haushaltsnettoeinkommen", font.lab=2, bty="l", ylab="Nr. der Stichprobe", xaxt="n", xlim=c(2000, 2800), "xaxs"="i", ylim=c(0,110), yaxp=c(0, 110, 11), "yaxs"="i", sub="Abb. 3: Sch\u00E4tzwerte von 100 Zufallsstichproben des Stichprobenumfangs n = 100")
axis(at=c(2000, 2200, 2400, 2600, 2800), side=1, tick=TRUE, labels=TRUE, lwd.ticks=2)
abline(v=2362, lwd=6, lty=2)
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.