This is based on this lesson: https://github.com/swcarpentry/bc/blob/master/novice/r/03-loops-R.Rmd
Question 1
Given the following loop:
`
vehicle <- c(“Atlantis”, “Endeavour”)
countdown_length <- c(5, 3)</p>
for (i in seq_along(vehicle)) {
for (j in (countdown_length[i]:0)) {
cat(vehicle[i], j, "n")
}
}
`
What is the correct output?
`
a.
Atlantis 3
Atlantis 2
Atlantis 1
Atlantis 0
Endeavour 5
Endeavour 4
Endeavour 3
Endeavour 2
Endeavour 1
Endeavour 0
b.
Endeavour 3
Endeavour 2
Endeavour 1
Endeavour 0
Atlantis 5
Atlantis 4
Atlantis 3
Atlantis 2
Atlantis 1
Atlantis 0
c.
Atlantis 5
Atlantis 4
Atlantis 3
Atlantis 2
Atlantis 1
Atlantis 0
Endeavour 3
Endeavour 2
Endeavour 1
Endeavour 0
d.
Endeavour 5
Endeavour 4
Endeavour 3
Endeavour 2
Endeavour 1
Endeavour 0
Atlantis 3
Atlantis 2
Atlantis 1
Atlantis 0
`
* * *
**Question 2**
Given a folder that contained a lot of CSV files, use a for loop to return a vector that contains the number of rows in each file. The vector should be named with the file names.