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.
Luchtkwaliteit
Sign in to test your solution.
# Parkeerdata van Stad Gent
data <- read.csv2("https://data.stad.gent/api/explore/v2.1/catalog/datasets/bezetting-parkeergarages-real-time/exports/csv",
sep = ";",
colClasses = c("character", "character", "NULL", "numeric", "numeric", rep("NULL", 14)) )
colnames(data) <- c("naam", "laatste_update", "capaciteit", "percentage_bezet")
data$percentage_bezet <- data$percentage_bezet / 100