Warning! It seems that you are using Dodona within another webpage, so not everything may work properly. Let your teacher know so that he can solve the problem by adjusting a setting in the learning environment. In the meantime, you can click this link to open Dodona in a new window.
Warning! The page was not fully loaded, probably because of a network issue. It could be that not all functionalities work as expected. Please try reloading the page.
R exercise
Simulatiestudie vang hervang
Sign in to hand in your solution and get feedback.
# Gegevens
N <- 1000
t <- 200
n <- 200
n_simulation <- 1000
s <- rbinom(n_simulation, size = n, prob = t / N)
N_estimated <- as.integer(t * n / s)
N_estimated
mean(N_estimated)
boxplot(N_estimated)