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.
Fietstelpaal
Sign in to test your solution.
# Gegevens ophalen van het Open Data portaal
data <- read.csv("https://data.stad.gent/api/explore/v2.1/catalog/datasets/fietstelpaal-visserij-2023-gent/exports/csv",
sep = ";", header = TRUE)
# Het onderstaande bepaalt de totalen per dag
data <- data.frame(aggregate(totaal ~ datum, data, sum),
tegenrichting = aggregate(tegenrichting ~ datum, data, sum)$tegenrichting,
hoofdrichting = aggregate(hoofdrichting ~ datum, data, sum)$hoofdrichting)
# Bepaal nu het gevraagde
You can submit as many times as you like. Only your latest submission will be taken into account.
Sign in to test your solution.