Opent je working directory zodat je een (data)bestand kan selecteren en inlezen
data <- readLines(file.choose())