`formula1` <-
structure(list(brackets = list("Alonso", c("Alonso", "Bottas",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz",
"Stroll", "Vandoorne", "Verstappen", "Vettel", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Vettel", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Wehrlein"), c("Alonso", "Bottas",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Vettel", "Wehrlein"
), c("Alonso", "Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz",
"Stroll", "Vandoorne", "Vettel", "Wehrlein"), c("Alonso", "Bottas",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Raikkonen",
"Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen", "Vettel",
"Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Sainz",
"Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Resta", "Sainz", "Stroll", "Vandoorne",
"Vettel", "Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Raikkonen",
"Resta", "Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Bottas",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Ocon", "Palmer", "Perez", "Resta", "Sainz", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Raikkonen", "Resta",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Palmer",
"Raikkonen", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Kvyat", "Magnussen", "Massa",
"Palmer", "Raikkonen", "Resta", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Kvyat", "Magnussen",
"Massa", "Palmer", "Raikkonen", "Resta", "Stroll", "Vandoorne",
"Verstappen"), c("Alonso", "Bottas", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Kvyat", "Magnussen", "Massa",
"Palmer", "Raikkonen", "Resta", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Bottas", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Magnussen", "Massa", "Palmer",
"Raikkonen", "Resta", "Stroll", "Vandoorne", "Verstappen"), c("Alonso",
"Bottas", "Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Magnussen", "Massa", "Palmer", "Raikkonen", "Resta", "Stroll",
"Vandoorne", "Verstappen"), c("Alonso", "Bottas", "Button", "Gasly",
"Giovinazzi", "Hartley", "Magnussen", "Massa", "Palmer", "Raikkonen",
"Resta", "Stroll", "Vandoorne", "Verstappen"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Vettel", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz",
"Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz",
"Stroll", "Vandoorne", "Vettel", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Raikkonen", "Resta", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Vettel", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hamilton", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Raikkonen",
"Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Sainz", "Vandoorne",
"Verstappen", "Vettel", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hamilton", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Raikkonen",
"Resta", "Sainz", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hamilton", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta",
"Ricciardo", "Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hamilton", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Resta", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Palmer", "Resta", "Ricciardo", "Sainz", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hamilton", "Hartley", "Hulkenberg", "Kvyat", "Massa",
"Palmer", "Resta", "Ricciardo", "Sainz", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz",
"Stroll", "Vandoorne", "Verstappen", "Vettel", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Raikkonen",
"Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen", "Vettel",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Raikkonen",
"Resta", "Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Resta", "Sainz", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Palmer", "Perez", "Raikkonen", "Resta", "Sainz", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Raikkonen",
"Resta", "Stroll", "Vandoorne", "Verstappen", "Vettel", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Vettel", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Vettel", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Ocon", "Palmer", "Perez", "Resta", "Ricciardo", "Sainz",
"Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta", "Sainz",
"Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Raikkonen", "Resta", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Raikkonen", "Resta",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Raikkonen",
"Resta", "Sainz", "Stroll", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Raikkonen",
"Resta", "Sainz", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Raikkonen", "Resta",
"Stroll", "Vandoorne", "Verstappen", "Vettel", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Raikkonen", "Resta", "Stroll", "Vandoorne", "Verstappen", "Vettel",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Raikkonen", "Resta", "Stroll", "Verstappen", "Vettel",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Ocon", "Raikkonen", "Resta", "Verstappen", "Vettel", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Palmer",
"Perez", "Raikkonen", "Resta", "Sainz", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Perez", "Resta", "Ricciardo", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Vettel",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Perez", "Resta", "Sainz", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Raikkonen", "Resta", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Palmer", "Resta", "Ricciardo", "Sainz",
"Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Palmer", "Resta", "Ricciardo", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Palmer", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa",
"Palmer", "Resta", "Sainz", "Stroll", "Vandoorne", "Vettel",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Ocon",
"Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Ocon",
"Palmer", "Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Ocon",
"Palmer", "Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Ocon", "Palmer",
"Raikkonen", "Resta", "Sainz", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Ocon", "Palmer", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Ocon", "Palmer", "Resta", "Ricciardo",
"Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Ocon", "Palmer", "Resta", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Palmer", "Perez", "Resta", "Sainz", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Palmer", "Raikkonen", "Resta", "Sainz", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Palmer", "Resta",
"Ricciardo", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Palmer", "Resta", "Sainz",
"Vandoorne", "Verstappen", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Palmer", "Resta", "Sainz", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Massa", "Ocon", "Palmer",
"Resta", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Massa", "Palmer", "Perez", "Raikkonen", "Resta", "Sainz",
"Vandoorne", "Verstappen", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Kvyat", "Massa", "Palmer", "Perez", "Raikkonen", "Resta", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Massa", "Palmer", "Resta", "Ricciardo", "Sainz", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Massa", "Palmer",
"Resta", "Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Massa", "Palmer", "Resta",
"Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Palmer", "Resta", "Sainz", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Magnussen", "Ocon", "Palmer", "Resta", "Ricciardo",
"Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Magnussen",
"Palmer", "Resta", "Ricciardo", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Magnussen", "Palmer", "Resta", "Ricciardo",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Magnussen",
"Palmer", "Resta", "Ricciardo", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Hulkenberg",
"Palmer", "Resta", "Sainz", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta",
"Ricciardo", "Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta",
"Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Kvyat", "Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Kvyat",
"Magnussen", "Massa", "Palmer", "Perez", "Resta", "Sainz", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Kvyat", "Magnussen", "Massa",
"Palmer", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Kvyat", "Magnussen", "Massa", "Palmer",
"Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Kvyat", "Magnussen", "Massa", "Palmer", "Resta",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Kvyat",
"Magnussen", "Massa", "Palmer", "Resta", "Sainz", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Kvyat", "Magnussen",
"Palmer", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Kvyat", "Magnussen", "Palmer", "Resta",
"Ricciardo", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Kvyat", "Magnussen", "Palmer", "Resta", "Ricciardo", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Kvyat", "Magnussen", "Palmer", "Resta",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Kvyat",
"Magnussen", "Palmer", "Resta", "Sainz", "Stroll", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Kvyat", "Palmer", "Resta", "Sainz", "Stroll", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Magnussen", "Palmer", "Resta", "Ricciardo", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Magnussen", "Palmer", "Resta",
"Ricciardo", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Palmer",
"Resta", "Ricciardo", "Vandoorne", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley", "Palmer",
"Resta", "Ricciardo", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Palmer", "Resta",
"Sainz", "Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Grosjean", "Hartley", "Palmer", "Resta",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hulkenberg", "Magnussen", "Palmer",
"Resta", "Ricciardo", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Ocon", "Palmer", "Perez", "Resta", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Ocon", "Palmer", "Resta", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Massa", "Ocon", "Raikkonen", "Resta", "Verstappen", "Vettel",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Palmer",
"Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Raikkonen", "Resta",
"Verstappen", "Vettel", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Ocon", "Palmer", "Perez", "Resta", "Stroll", "Vandoorne", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Ocon", "Palmer", "Resta",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Palmer", "Resta", "Sainz", "Stroll", "Vandoorne",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Palmer", "Resta", "Sainz", "Vandoorne", "Verstappen", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Raikkonen", "Resta", "Verstappen",
"Vettel", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Magnussen",
"Resta", "Sainz", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Hulkenberg",
"Kvyat", "Magnussen", "Resta", "Sainz", "Verstappen", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Hulkenberg", "Kvyat", "Massa", "Palmer", "Resta", "Sainz", "Stroll",
"Vandoorne", "Vettel", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Massa",
"Palmer", "Resta", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Hulkenberg",
"Kvyat", "Ocon", "Palmer", "Perez", "Resta", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Hulkenberg", "Kvyat", "Ocon", "Perez", "Resta", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly",
"Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Palmer", "Resta",
"Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Hulkenberg",
"Kvyat", "Perez", "Resta", "Stroll", "Vandoorne", "Wehrlein"),
c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Hulkenberg", "Kvyat", "Resta", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Hulkenberg", "Resta", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Massa", "Palmer", "Resta",
"Sainz", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Kvyat",
"Magnussen", "Massa", "Resta", "Sainz", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Ocon", "Palmer", "Perez",
"Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Ocon", "Palmer", "Resta",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"),
c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Palmer", "Perez", "Resta",
"Sainz", "Stroll", "Vandoorne", "Verstappen", "Wehrlein"),
c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Palmer", "Perez", "Resta",
"Stroll", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Kvyat",
"Magnussen", "Palmer", "Perez", "Resta", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Palmer", "Resta", "Sainz",
"Stroll", "Vandoorne", "Verstappen"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Hartley", "Kvyat", "Magnussen",
"Palmer", "Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Resta", "Sainz", "Verstappen"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Resta", "Sainz", "Verstappen",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Massa", "Palmer", "Resta", "Stroll",
"Vandoorne", "Wehrlein"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Kvyat", "Massa", "Resta",
"Sainz", "Vandoorne", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Kvyat",
"Massa", "Resta", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Kvyat",
"Palmer", "Resta", "Sainz", "Stroll", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Kvyat",
"Resta", "Stroll", "Vandoorne", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Magnussen",
"Palmer", "Perez", "Resta", "Vandoorne", "Verstappen", "Wehrlein"
), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Magnussen", "Palmer", "Resta", "Sainz", "Stroll",
"Vandoorne", "Verstappen"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Magnussen", "Perez", "Resta",
"Vandoorne", "Verstappen", "Wehrlein"), c("Alonso", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Hartley", "Magnussen",
"Perez", "Resta", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Magnussen",
"Resta", "Sainz", "Stroll", "Vandoorne", "Verstappen"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley", "Palmer",
"Resta", "Vandoorne"), c("Alonso", "Button", "Ericsson",
"Gasly", "Giovinazzi", "Hartley", "Palmer", "Resta", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Perez", "Resta", "Verstappen", "Wehrlein"), c("Alonso",
"Button", "Ericsson", "Gasly", "Giovinazzi", "Hulkenberg",
"Magnussen", "Palmer", "Resta", "Ricciardo", "Wehrlein"),
c("Alonso", "Button", "Ericsson", "Gasly", "Grosjean", "Hartley",
"Magnussen", "Palmer", "Resta", "Ricciardo", "Stroll", "Vandoorne",
"Wehrlein"), c("Alonso", "Button", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Palmer", "Resta", "Ricciardo", "Wehrlein"
), c("Alonso", "Button", "Gasly", "Giovinazzi", "Hartley",
"Kvyat", "Magnussen", "Resta", "Sainz", "Verstappen"), c("Alonso",
"Button", "Gasly", "Giovinazzi", "Hartley", "Kvyat", "Massa",
"Resta", "Sainz", "Vandoorne", "Verstappen", "Wehrlein"),
c("Alonso", "Button", "Gasly", "Giovinazzi", "Hartley", "Kvyat",
"Massa", "Resta", "Sainz", "Verstappen"), c("Alonso", "Button",
"Gasly", "Giovinazzi", "Hartley", "Kvyat", "Massa", "Resta",
"Sainz", "Verstappen", "Wehrlein"), c("Alonso", "Button",
"Gasly", "Giovinazzi", "Hartley", "Kvyat", "Palmer", "Resta",
"Sainz", "Stroll", "Wehrlein"), c("Alonso", "Button", "Gasly",
"Giovinazzi", "Hartley", "Palmer", "Resta", "Sainz", "Stroll",
"Wehrlein"), c("Alonso", "Button", "Gasly", "Giovinazzi",
"Hartley", "Palmer", "Resta", "Sainz", "Wehrlein"), c("Alonso",
"Button", "Gasly", "Giovinazzi", "Hartley", "Perez", "Resta",
"Verstappen", "Wehrlein"), c("Alonso", "Button", "Gasly",
"Giovinazzi", "Hulkenberg", "Magnussen", "Palmer", "Resta",
"Ricciardo", "Wehrlein"), "Bottas", c("Bottas", "Button",
"Gasly", "Giovinazzi", "Hartley", "Magnussen", "Massa", "Palmer",
"Raikkonen", "Resta", "Stroll", "Vandoorne", "Verstappen"
), c("Bottas", "Button", "Gasly", "Giovinazzi", "Hartley",
"Magnussen", "Palmer", "Raikkonen", "Resta", "Stroll", "Vandoorne",
"Verstappen"), c("Bottas", "Button", "Gasly", "Giovinazzi",
"Hartley", "Palmer", "Raikkonen", "Resta", "Stroll", "Vandoorne",
"Verstappen"), c("Bottas", "Button", "Gasly", "Giovinazzi",
"Hartley", "Raikkonen", "Resta", "Stroll", "Vandoorne", "Verstappen"
), c("Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Resta", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Wehrlein"), c("Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Magnussen", "Massa", "Ocon", "Palmer", "Perez", "Resta",
"Ricciardo", "Stroll", "Vandoorne", "Wehrlein"), c("Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Resta", "Ricciardo", "Stroll", "Vandoorne", "Wehrlein"),
c("Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Palmer",
"Resta", "Ricciardo", "Stroll", "Vandoorne", "Wehrlein"),
c("Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Palmer",
"Resta", "Ricciardo", "Stroll", "Wehrlein"), c("Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Ocon", "Palmer", "Perez",
"Resta", "Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Ocon", "Palmer", "Resta",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Palmer", "Raikkonen",
"Resta", "Sainz", "Wehrlein"), c("Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Massa", "Palmer", "Perez", "Raikkonen", "Resta", "Vandoorne",
"Verstappen"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Massa", "Palmer",
"Perez", "Raikkonen", "Resta", "Vandoorne", "Verstappen",
"Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Massa", "Palmer",
"Resta", "Ricciardo", "Sainz", "Vandoorne", "Wehrlein"),
c("Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Palmer", "Raikkonen",
"Resta", "Sainz", "Wehrlein"), c("Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Palmer", "Resta", "Ricciardo", "Sainz", "Vandoorne", "Wehrlein"
), c("Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Palmer", "Resta", "Ricciardo",
"Sainz", "Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Magnussen", "Massa",
"Palmer", "Resta", "Ricciardo", "Stroll", "Wehrlein"), c("Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Hulkenberg", "Magnussen", "Massa", "Resta", "Ricciardo",
"Stroll", "Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Massa", "Resta", "Ricciardo"
), c("Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Massa", "Resta", "Ricciardo", "Stroll",
"Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Massa", "Resta", "Ricciardo",
"Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Grosjean", "Hartley", "Kvyat", "Magnussen", "Massa", "Palmer",
"Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne", "Wehrlein"
), c("Button", "Ericsson", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Kvyat", "Magnussen", "Ocon", "Palmer", "Resta",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hartley",
"Kvyat", "Magnussen", "Ocon", "Palmer", "Resta", "Stroll",
"Vandoorne", "Wehrlein"), c("Button", "Ericsson", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Kvyat", "Magnussen",
"Palmer", "Resta", "Ricciardo", "Sainz", "Stroll", "Vandoorne",
"Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Hulkenberg", "Kvyat", "Palmer", "Raikkonen",
"Resta", "Sainz", "Wehrlein"), c("Button", "Ericsson", "Gasly",
"Giovinazzi", "Hartley", "Hulkenberg", "Kvyat", "Palmer",
"Resta", "Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"
), c("Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Hulkenberg", "Kvyat", "Resta", "Sainz", "Stroll", "Vandoorne",
"Vettel", "Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Kvyat", "Magnussen", "Palmer", "Resta", "Ricciardo",
"Sainz", "Stroll", "Vandoorne", "Wehrlein"), c("Button",
"Ericsson", "Gasly", "Giovinazzi", "Hartley", "Kvyat", "Magnussen",
"Palmer", "Resta", "Ricciardo", "Sainz", "Stroll", "Wehrlein"
), c("Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Kvyat", "Palmer", "Resta", "Ricciardo", "Sainz", "Stroll"
), c("Button", "Ericsson", "Gasly", "Giovinazzi", "Hartley",
"Kvyat", "Palmer", "Resta", "Ricciardo", "Sainz", "Stroll",
"Wehrlein"), c("Button", "Ericsson", "Gasly", "Giovinazzi",
"Hartley", "Palmer", "Resta", "Vandoorne"), c("Button", "Ericsson",
"Gasly", "Giovinazzi", "Kvyat", "Palmer", "Resta", "Ricciardo",
"Sainz", "Stroll"), c("Button", "Ericsson", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Palmer", "Resta",
"Ricciardo", "Sainz"), c("Button", "Ericsson", "Giovinazzi",
"Grosjean", "Hartley", "Hulkenberg", "Kvyat", "Palmer", "Resta",
"Ricciardo", "Sainz", "Wehrlein"), c("Button", "Ericsson",
"Giovinazzi", "Grosjean", "Hartley", "Kvyat", "Magnussen",
"Ocon", "Palmer", "Resta", "Stroll", "Vandoorne", "Wehrlein"
), c("Button", "Ericsson", "Giovinazzi", "Hartley", "Hulkenberg",
"Kvyat", "Palmer", "Raikkonen", "Resta", "Sainz", "Wehrlein"
), c("Button", "Ericsson", "Giovinazzi", "Hartley", "Hulkenberg",
"Kvyat", "Raikkonen", "Resta", "Sainz", "Wehrlein"), c("Button",
"Ericsson", "Giovinazzi", "Hartley", "Hulkenberg", "Kvyat",
"Resta", "Sainz", "Stroll", "Vandoorne", "Vettel", "Wehrlein"
), c("Button", "Ericsson", "Giovinazzi", "Hartley", "Hulkenberg",
"Kvyat", "Resta", "Sainz", "Stroll", "Vettel", "Wehrlein"
), c("Button", "Ericsson", "Giovinazzi", "Hartley", "Kvyat",
"Raikkonen", "Resta", "Sainz"), c("Button", "Ericsson", "Giovinazzi",
"Hartley", "Kvyat", "Raikkonen", "Resta", "Sainz", "Wehrlein"
), c("Button", "Ericsson", "Giovinazzi", "Kvyat", "Palmer",
"Resta", "Ricciardo", "Sainz", "Stroll"), c("Button", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Kvyat",
"Massa", "Palmer", "Perez", "Raikkonen", "Resta", "Vandoorne",
"Verstappen"), c("Button", "Gasly", "Giovinazzi", "Grosjean",
"Hartley", "Hulkenberg", "Kvyat", "Massa", "Palmer", "Perez",
"Raikkonen", "Resta", "Verstappen"), c("Button", "Gasly",
"Giovinazzi", "Grosjean", "Hartley", "Hulkenberg", "Massa",
"Resta", "Ricciardo"), c("Button", "Gasly", "Giovinazzi",
"Hartley", "Hulkenberg", "Kvyat", "Massa", "Palmer", "Perez",
"Raikkonen", "Resta", "Verstappen"), c("Button", "Giovinazzi",
"Grosjean", "Hartley", "Kvyat", "Magnussen", "Ocon", "Palmer",
"Resta", "Stroll", "Vandoorne"), c("Button", "Giovinazzi",
"Grosjean", "Hartley", "Kvyat", "Magnussen", "Ocon", "Palmer",
"Resta", "Stroll", "Vandoorne", "Wehrlein"), c("Button",
"Giovinazzi", "Hartley", "Kvyat", "Magnussen", "Ocon", "Palmer",
"Resta", "Stroll", "Vandoorne"), c("Button", "Giovinazzi",
"Kvyat", "Palmer", "Resta", "Ricciardo", "Sainz", "Stroll"
), "Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton",
"Hartley", "Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon",
"Palmer", "Perez", "Raikkonen", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Vettel", "Wehrlein"), powers = c(11,
-20, -5, -2, -1, -2, -1, -9, -6, -2, -1, -1, -2, -2, -2, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -3, -3, -1, -1, -1,
-1, -1, -3, -1, -1, -1, -1, -1, -1, -1, -1, -1, -4, -4, -2, -3,
-1, -1, -1, -1, -1, -6, -1, -6, -4, -2, -2, -2, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -2, -1, -1, -1, -1, -1, -1, -1, -1, -1, -2,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 19, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 14, 5, 1, 17, 20, 2, 14, 11, 15, 17, 19, 11, 19, 17, 14,
12, 16, 14, 13, 18, 15), pnames = c("Alonso", "Bottas", "Button",
"Ericsson", "Gasly", "Giovinazzi", "Grosjean", "Hamilton", "Hartley",
"Hulkenberg", "Kvyat", "Magnussen", "Massa", "Ocon", "Palmer",
"Perez", "Raikkonen", "Resta", "Ricciardo", "Sainz", "Stroll",
"Vandoorne", "Verstappen", "Vettel", "Wehrlein")), class = "hyper2")
`F1_points_2017` <- c(Hamilton = 363L, Vettel = 317L, Bottas = 305L, Raikkonen = 205L,
Ricciardo = 200L, Verstappen = 168L, Perez = 100L, Ocon = 87L,
Sainz = 54L, Hulkenberg = 43L, Massa = 43L, Stroll = 40L, Grosjean = 28L,
Magnussen = 19L, Alonso = 17L, Vandoorne = 13L, Palmer = 8L,
Wehrlein = 5L, Kvyat = 0L, Ericsson = 0L, Gasly = 0L, Giovinazzi = 0L,
Hartley = 0L, Button = 0L, Resta = 0L)
`F1_table_2016` <-
structure(list(AUS = c("1", "2", "4", "3", "10", "Ret", "13",
"8", "7", "Ret", "5", "9", "6", "DNS", "14", "12", "15", "11",
"16", "0", "Ret", "Ret", "0", "Ret"), BHR = c("1", "3", "4",
"DNS", "6", "2", "16", "9", "15", "0", "8", "Ret", "5", "7",
"Ret", "11", "14", "DNS", "13", "10", "Ret", "12", "0", "17"),
CHN = c(1L, 7L, 4L, 2L, 8L, 5L, 11L, 10L, 15L, 12L, 6L, 9L,
19L, 3L, 13L, 17L, 20L, 22L, 18L, 0L, 14L, 16L, 0L, 21L),
RUS = c("1", "2", "11", "Ret", "Ret", "3", "9", "4", "Ret",
"6", "5", "12", "8", "15", "10", "7", "16", "13", "18", "0",
"17", "14", "0", "Ret"), ESP = c("Ret", "Ret", "4", "3",
"1", "2", "7", "5", "Ret", "Ret", "8", "6", "Ret", "10",
"9", "15", "14", "13", "16", "0", "11", "12", "0", "17"),
MON = c("7", "1", "2", "4", "Ret", "Ret", "3", "12", "6",
"5", "10", "8", "13", "Ret", "9", "Ret", "Ret", "Ret", "14",
"0", "11", "Ret", "0", "15"), CAN = c("5", "1", "7", "2",
"4", "6", "10", "3", "8", "11", "Ret", "9", "14", "12", "Ret",
"16", "18", "Ret", "17", "0", "13", "15", "0", "19"), EUR = c("1",
"5", "7", "2", "8", "4", "3", "6", "9", "Ret", "10", "Ret",
"13", "Ret", "11", "14", "12", "15", "Ret", "0", "16", "17",
"0", "18"), AUT = c("4", "1", "5", "Ret", "2", "3", "17",
"9", "19", "18", "20", "8", "7", "Ret", "6", "14", "13",
"12", "10", "0", "11", "15", "0", "16"), GBR = c("3", "1",
"4", "9", "2", "5", "6", "14", "7", "13", "11", "8", "Ret",
"10", "12", "17", "15", "Ret", "Ret", "0", "16", "Ret", "0",
"Ret"), HUN = c("2", "1", "3", "4", "5", "6", "11", "9",
"10", "7", "18", "8", "14", "16", "Ret", "15", "17", "12",
"19", "0", "13", "20", "0", "21"), GER = c("4", "1", "2",
"5", "3", "6", "10", "9", "7", "12", "Ret", "14", "13", "15",
"8", "16", "Ret", "19", "17", "0", "11", "18", "0", "20"),
BEL = c("1", "3", "2", "6", "11", "9", "5", "8", "4", "7",
"10", "Ret", "13", "14", "Ret", "Ret", "17", "15", "Ret",
"0", "12", "Ret", "16", "0"), ITA = c("1", "2", "5", "3",
"7", "4", "8", "6", "10", "14", "9", "15", "11", "Ret", "12",
"17", "Ret", "Ret", "Ret", "0", "13", "16", "18", "0"), SIN = c("1",
"3", "2", "5", "6", "4", "8", "Ret", "Ret", "7", "12", "14",
"DNS", "9", "Ret", "10", "13", "15", "16", "0", "11", "17",
"18", "0"), MAL = c("3", "Ret", "1", "Ret", "2", "4", "6",
"5", "8", "7", "13", "11", "Ret", "14", "9", "Ret", "Ret",
"10", "15", "0", "Ret", "12", "16", "0"), JPN = c(1L, 3L,
6L, 4L, 2L, 5L, 7L, 10L, 8L, 16L, 9L, 17L, 11L, 13L, 18L,
14L, 19L, 12L, 22L, 0L, 20L, 15L, 21L, 0L), USA = c("2",
"1", "3", "4", "Ret", "Ret", "8", "16", "Ret", "5", "7",
"6", "10", "11", "9", "12", "15", "13", "17", "0", "Ret",
"14", "18", "0"), MEX = c("2", "1", "3", "5", "4", "6", "10",
"8", "7", "13", "9", "16", "20", "18", "12", "17", "15",
"14", "Ret", "0", "19", "11", "21", "0"), BRA = c("2", "1",
"8", "5", "3", "Ret", "4", "11", "7", "10", "Ret", "6", "DNS",
"13", "16", "14", "9", "Ret", "15", "0", "Ret", "Ret", "12",
"0"), ABU = c("2", "1", "5", "3", "4", "6", "8", "Ret", "7",
"10", "9", "Ret", "11", "Ret", "Ret", "Ret", "16", "17",
"14", "0", "12", "15", "13", "0")), class = "data.frame", row.names = c("Rosberg",
"Hamilton", "Ricciardo", "Vettel", "Verstappen", "Raikkonen",
"Perez", "Bottas", "Hulkenberg", "Alonso", "Massa", "Sainz",
"Grosjean", "Kvyat", "Button", "Magnussen", "Nasr", "Palmer",
"Wehrlein", "Vandoorne", "Gutierrez", "Ericsson", "Ocon", "Haryanto"
))
`F1_table_2017` <-
structure(list(AUS = c("2", "1", "3", "4", "Ret", "5", "7", "10",
"8", "11", "6", "Ret", "Ret", "Ret", "Ret", "13", "Ret", "WD",
"9", "Ret", "0", "12", "0", "0", "0"), CHN = c("1", "2", "6",
"5", "4", "3", "9", "10", "7", "12", "14", "Ret", "11", "8",
"Ret", "Ret", "13", "0", "Ret", "15", "0", "Ret", "0", "0", "0"
), BHR = c("2", "1", "3", "4", "5", "Ret", "7", "10", "Ret",
"9", "6", "Ret", "8", "Ret", "14", "DNS", "13", "11", "12", "Ret",
"0", "0", "0", "0", "0"), RUS = c("4", "2", "1", "3", "Ret",
"5", "6", "7", "10", "8", "9", "11", "Ret", "13", "DNS", "14",
"Ret", "16", "12", "15", "0", "0", "0", "0", "0"), ESP = c("1",
"2", "Ret", "Ret", "3", "Ret", "4", "5", "7", "6", "13", "16",
"10", "14", "12", "Ret", "15", "8", "9", "11", "0", "0", "0",
"0", "0"), MON = c("7", "1", "4", "2", "3", "5", "13", "12",
"6", "Ret", "9", "15", "8", "10", "0", "Ret", "11", "Ret", "14",
"Ret", "0", "0", "0", "Ret", "0"), CAN = c("1", "4", "2", "7",
"3", "Ret", "5", "6", "Ret", "8", "Ret", "9", "10", "12", "16",
"14", "11", "15", "Ret", "13", "0", "0", "0", "0", "0"), AZE = c("5",
"4", "2", "14", "1", "Ret", "Ret", "6", "8", "Ret", "Ret", "3",
"13", "7", "9", "12", "Ret", "10", "Ret", "11", "0", "0", "0",
"0", "0"), AUT = c("4", "2", "1", "5", "3", "Ret", "7", "8",
"Ret", "13", "9", "10", "6", "Ret", "Ret", "12", "11", "14",
"16", "15", "0", "0", "0", "0", "0"), GBR = c("1", "7", "2",
"3", "5", "4", "9", "8", "Ret", "6", "10", "16", "13", "12",
"Ret", "11", "DNS", "17", "15", "14", "0", "0", "0", "0", "0"
), HUN = c("4", "1", "3", "2", "Ret", "5", "8", "9", "7", "17",
"WD", "14", "Ret", "13", "6", "10", "12", "15", "11", "16", "0",
"0", "0", "0", "Ret"), BEL = c("1", "2", "5", "4", "3", "Ret",
"17", "9", "10", "6", "8", "11", "7", "15", "Ret", "14", "13",
"Ret", "12", "16", "0", "0", "0", "0", "0"), ITA = c("1", "3",
"2", "5", "4", "10", "9", "6", "14", "13", "8", "7", "15", "11",
"17", "Ret", "Ret", "16", "12", "18", "0", "0", "0", "0", "0"
), SIN = c("1", "Ret", "3", "Ret", "2", "Ret", "5", "10", "4",
"Ret", "11", "8", "9", "Ret", "Ret", "7", "6", "12", "Ret", "Ret",
"0", "0", "0", "0", "0"), MAL = c("2", "4", "5", "DNS", "3",
"1", "6", "10", "Ret", "16", "9", "8", "13", "12", "11", "7",
"15", "17", "0", "18", "14", "0", "0", "0", "0"), JPN = c("1",
"Ret", "4", "5", "3", "2", "7", "6", "Ret", "Ret", "10", "Ret",
"9", "8", "11", "14", "12", "15", "0", "Ret", "13", "0", "0",
"0", "0"), USA = c("1", "2", "5", "3", "Ret", "4", "8", "6",
"7", "Ret", "9", "11", "14", "16", "Ret", "12", "0", "Ret", "10",
"15", "0", "0", "13", "0", "0"), MEX = c("9", "4", "2", "3",
"Ret", "1", "7", "5", "Ret", "Ret", "11", "6", "15", "8", "10",
"12", "0", "14", "0", "Ret", "13", "0", "Ret", "0", "0"), BRA = c("4",
"1", "2", "3", "6", "5", "9", "Ret", "11", "10", "7", "16", "15",
"Ret", "8", "Ret", "0", "14", "0", "13", "12", "0", "Ret", "0",
"0"), ABU = c("2", "3", "1", "4", "Ret", "5", "7", "8", "Ret",
"6", "10", "18", "11", "13", "9", "12", "0", "14", "0", "17",
"16", "0", "15", "0", "0")), class = "data.frame", row.names = c("Hamilton",
"Vettel", "Bottas", "Raikkonen", "Ricciardo", "Verstappen", "Perez",
"Ocon", "Sainz", "Hulkenberg", "Massa", "Stroll", "Grosjean",
"Magnussen", "Alonso", "Vandoorne", "Palmer", "Wehrlein", "Kvyat",
"Ericsson", "Gasly", "Giovinazzi", "Hartley", "Button", "Resta"
))
`F1_table_2018` <-
structure(list(AUS = c("2", "1", "3", "6", "8", "4", "7", "11",
"Ret", "10", "5", "12", "13", "Ret", "Ret", "9", "Ret", "14",
"15", "Ret"), BHR = c("3", "1", "Ret", "Ret", "2", "Ret", "6",
"16", "5", "11", "7", "10", "12", "13", "4", "8", "9", "14",
"17", "15"), CHN = c(4L, 8L, 3L, 5L, 2L, 1L, 6L, 12L, 10L, 9L,
7L, 11L, 19L, 17L, 18L, 13L, 16L, 14L, 20L, 15L), AZE = c("1",
"4", "2", "Ret", "14", "Ret", "Ret", "3", "13", "5", "7", "Ret",
"6", "Ret", "12", "9", "11", "8", "10", "Ret"), ESP = c("1",
"4", "Ret", "3", "2", "5", "Ret", "9", "6", "7", "8", "Ret",
"10", "Ret", "Ret", "Ret", "13", "11", "12", "14"), MON = c("3",
"2", "4", "9", "5", "1", "8", "12", "13", "10", "Ret", "6", "18",
"15", "7", "14", "11", "17", "19", "16"), CAN = c("5", "1", "6",
"3", "2", "4", "7", "14", "13", "8", "Ret", "9", "10", "12",
"11", "16", "15", "Ret", "Ret", "17"), FRA = c("1", "5", "3",
"2", "7", "4", "9", "Ret", "6", "8", "16", "Ret", "10", "11",
"Ret", "12", "13", "17", "14", "15"), AUT = c("Ret", "3", "2",
"1", "Ret", "Ret", "Ret", "7", "5", "12", "8", "6", "9", "4",
"11", "15", "10", "14", "Ret", "13"), GBR = c("2", "1", "3",
"15", "4", "5", "6", "10", "9", "Ret", "8", "7", "Ret", "Ret",
"13", "11", "Ret", "12", "Ret", "14"), GER = c("1", "Ret", "3",
"4", "2", "Ret", "5", "7", "11", "12", "16", "8", "15", "6",
"14", "13", "9", "Ret", "10", "Ret"), HUN = c("1", "2", "3",
"Ret", "5", "4", "12", "14", "7", "9", "8", "13", "Ret", "10",
"6", "Ret", "15", "17", "11", "16"), BEL = c("2", "1", "Ret",
"3", "4", "Ret", "Ret", "5", "8", "11", "Ret", "6", "Ret", "7",
"9", "15", "10", "13", "14", "12"), ITA = c("1", "4", "2", "5",
"3", "Ret", "13", "7", "16", "8", "Ret", "6", "11", "DSQ", "14",
"12", "15", "9", "Ret", "10"), SIN = c("1", "3", "5", "2", "4",
"6", "10", "16", "18", "8", "7", "Ret", "9", "15", "13", "12",
"11", "14", "17", "19"), RUS = c("1", "3", "4", "5", "2", "6",
"12", "10", "8", "17", "14", "9", "7", "11", "Ret", "16", "13",
"15", "Ret", "18"), JPN = c("1", "6", "5", "3", "2", "4", "Ret",
"7", "Ret", "10", "14", "9", "Ret", "8", "11", "15", "12", "17",
"13", "16"), USA = c("3", "4", "1", "2", "5", "Ret", "6", "8",
"DSQ", "7", "Ret", "DSQ", "Ret", "Ret", "12", "11", "10", "14",
"9", "13"), MEX = c("4", "2", "3", "1", "5", "Ret", "6", "Ret",
"15", "Ret", "Ret", "11", "7", "16", "10", "8", "9", "12", "14",
"13"), BRA = c("1", "6", "3", "2", "5", "4", "Ret", "10", "9",
"12", "17", "14", "7", "8", "13", "15", "Ret", "18", "11", "16"
), ABU = c("1", "2", "Ret", "3", "5", "4", "Ret", "8", "10",
"6", "11", "Ret", "7", "9", "Ret", "14", "Ret", "13", "12", "15"
)), class = "data.frame", row.names = c("Hamilton", "Vettel",
"Raikkonen", "Verstappen", "Bottas", "Ricciardo", "Hulkenberg",
"Perez", "Magnussen", "Sainz", "Alonso", "Ocon", "Leclerc", "Grosjean",
"Gasly", "Vandoorne", "Ericsson", "Stroll", "Hartley", "Sirotkin"
))
`F1_table_2019` <-
structure(list(AUS = c("2", "1", "3", "5", "4", "Ret", "11",
"14", "Ret", "13", "12", "8", "10", "7", "9", "6", "15", "Ret",
"17", "16"), BHR = c("1", "2", "4", "3", "5", "19", "8", "9",
"18", "10", "6", "7", "12", "17", "14", "13", "11", "Ret", "16",
"15"), CHN = c("1", "2", "4", "5", "3", "14", "6", "10", "7",
"8", "18", "9", "Ret", "Ret", "12", "13", "15", "11", "17", "16"
), AZE = c("2", "1", "4", "5", "3", "7", "Ret", "11", "Ret",
"6", "8", "10", "Ret", "14", "9", "13", "12", "Ret", "16", "15"
), ESP = c("1", "2", "3", "5", "4", "8", "6", "11", "12", "15",
"Ret", "14", "9", "13", "Ret", "7", "16", "10", "18", "17"),
MON = c("1", "3", "4", "Ret", "2", "6", "5", "8", "9", "12",
"11", "17", "7", "13", "16", "14", "19", "10", "18", "15"
), CAN = c("1", "4", "5", "3", "2", "11", "8", "Ret", "6",
"12", "Ret", "15", "10", "7", "9", "17", "13", "14", "18",
"16"), FRA = c("1", "2", "4", "3", "5", "6", "10", "15",
"11", "12", "9", "7", "14", "8", "13", "17", "16", "Ret",
"18", "19"), AUT = c(5L, 3L, 1L, 2L, 4L, 8L, 7L, 15L, 12L,
11L, 6L, 9L, 17L, 13L, 14L, 19L, 10L, 16L, 20L, 18L), GBR = c("1",
"2", "5", "3", "16", "6", "4", "12", "7", "17", "11", "8",
"9", "10", "13", "Ret", "Ret", "Ret", "15", "14"), GER = c("9",
"Ret", "1", "Ret", "2", "5", "14", "6", "Ret", "Ret", "Ret",
"12", "3", "Ret", "4", "8", "13", "7", "10", "11"), HUN = c("1",
"8", "2", "4", "3", "5", "6", "10", "14", "11", "9", "7",
"15", "12", "17", "13", "18", "Ret", "19", "16"), BEL = c("2",
"3", "Ret", "1", "4", "Ret", "9", "5", "14", "6", "11", "16",
"7", "8", "10", "12", "18", "13", "17", "15"), ITA = c("3",
"2", "8", "1", "13", "Ret", "11", "6", "4", "7", "10", "15",
"Ret", "5", "12", "Ret", "9", "16", "17", "14"), SIN = c("4",
"5", "3", "2", "1", "12", "8", "6", "14", "Ret", "7", "Ret",
"15", "9", "13", "17", "10", "11", "16", "Ret"), RUS = c("1",
"2", "4", "3", "Ret", "6", "14", "5", "Ret", "7", "8", "13",
"12", "10", "11", "9", "15", "Ret", "Ret", "Ret"), JPN = c("3",
"1", "Ret", "6", "2", "5", "7", "4", "DSQ", "8", "11", "12",
"10", "DSQ", "9", "15", "14", "13", "17", "16"), MEX = c("1",
"3", "6", "4", "2", "13", "9", "5", "8", "7", "Ret", "Ret",
"11", "10", "12", "15", "14", "17", "18", "16"), USA = c("2",
"1", "3", "4", "Ret", "8", "16", "5", "6", "10", "7", "11",
"12", "9", "13", "18", "14", "15", "Ret", "17"), BRA = c("7",
"Ret", "1", "18", "17", "3", "2", "14", "6", "9", "8", "4",
"10", "15", "19", "11", "5", "13", "16", "12"), ABU = c("1",
"4", "2", "3", "5", "10", "18", "6", "11", "7", "8", "13",
"9", "12", "Ret", "14", "16", "15", "19", "17")), class = "data.frame", row.names = c("Hamilton",
"Bottas", "Verstappen", "Leclerc", "Vettel", "Sainz", "Gasly",
"Albon", "Ricciardo", "Perez", "Norris", "Raikkonen", "Kvyat",
"Hulkenberg", "Stroll", "Magnussen", "Giovinazzi", "Grosjean",
"Kubica", "Russell"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.