#Load the required packages
# Your student number goes here
ysn = 1000
# Calculate your student number modulo 3
filenum <- ysn %% 3
filenum
## [1] 1
filename <- paste0("./data/afl_",filenum,".csv")
filename
## [1] "./data/afl_1.csv"
# Read in the data
# Display the first 10 lines of the data
#
[Some text describing what your R code tells you.]
#
#
#
#
#
etc
variable1: type and justification
variable2: type and justification
etc
etc.
etc.
etc.
etc.