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.
Histogram - Olympische atleten
Sign in to test your solution.
# Een dataset met gegevens van Olympische atleten.
data <- read.csv("https://raw.githubusercontent.com/rfordatascience/tidytuesday/master/data/2021/2021-07-27/olympics.csv",
header = TRUE,
colClasses = c("NULL", rep("character", 2), rep("numeric", 3), "NULL", "character", "NULL", "numeric", rep("character", 4), "NULL" ))
# Enkel de gegevens van de atleten worden geselecteerd.
data <- data[data$sport == "Athletics" &
!is.na(data$height) &
!is.na(data$weight), ]
rownames(data) <- seq_len(nrow(data))
# Noteer hieronder je berekeningen
You can submit as many times as you like. Only your latest submission will be taken into account.
Sign in to test your solution.