This file lists flags in random orders suitable for pollinator observation tomorrow.
Here's the R code used:
flagOrder <- function() {
cat(cat(sample(LETTERS[1:8]),"\n"),
cat(sample(LETTERS[1:8]),"\n"),
cat(sample(LETTERS[1:8]),"\n"),
cat(sample(LETTERS[1:8]),"\n"),
cat(sample(LETTERS[1:8]),"\n"),
"\n")
}
for (i in 1:20) flagOrder()
Leave a comment