---
format:
  html:
    embed-resources: true
editor: visual
echo: FALSE
warning: FALSE
editor_options: 
  chunk_output_type: console
---

```{r}

# Dit programma benadert grafisch, met een histogram op de dichtheidsschaal,
# de dichtheidsfunctie ( = het kansmodel) van het STEEKPROEFGEMIDDELDE bij een
# steekproef die getrokken is uit de CONTINUE populatie bepaald door (vul in):
# pop <- 1  = "de uniforme" met dichtheid f(x) = 1 voor 0 ≤ x ≤ 1
# pop <- 2  = "het maximum" met dichtheid f(x) = 2x voor 0 ≤ x ≤ 1

pop <- 2

# Vul hieronder de steekproefgrootte in (ten minste gelijk aan 2)
# als je 0 (nul) invult dan krijg je het kansmodel van de populatie:

n_stkp <- 36

# Vul het aantal herhalingen bij de simulatie in (ten minste gelijk aan 1)

sim_aantal <- 100000


# ALS JE KLAAR BENT DRUK JE IN DE BALK HIERBOVEN OP DE RENDER KNOP


## om je resultaat daarna te bewaren ga je op je laptop naar
## de qmd folder waar je het HTML-bestand "stkp_CLT_cont.html" een 
## andere HTML-naam naar keuze geeft, zoals "uwnaam-oef123.html"


source("lib/stkp_CLT_cont.R")
stkp_CLT_cont(pop,n_stkp,sim_aantal)
```
