The head() and str() allow us to get a snap shot of the data and see what is in it and what data types we are working with. head() shows us the first six observations of each variable, while str() shows us the structure of each variable.
library (RandomData)<- race_statshead (dat)
# A tibble: 6 × 30
constructorId raceId driverId statusId circuitId race_name year circuit
<dbl> <dbl> <dbl> <dbl> <dbl> <chr> <dbl> <chr>
1 1 1000 4 11 11 Hungarian Gran… 2018 Hungar…
2 1 1000 4 11 11 Hungarian Gran… 2018 Hungar…
3 1 1000 4 11 11 Hungarian Gran… 2018 Hungar…
4 1 1000 4 11 11 Hungarian Gran… 2018 Hungar…
5 1 1000 4 11 11 Hungarian Gran… 2018 Hungar…
6 1 1000 4 11 11 Hungarian Gran… 2018 Hungar…
# ℹ 22 more variables: country <chr>, alt <dbl>, points <dbl>, laps <dbl>,
# fastestLapTime <chr>, fastestLapSpeed <chr>, constructor <chr>,
# constructor_nationality <chr>, forename <chr>, surname <chr>,
# driver_nationality <chr>, status <chr>, lap_number <dbl>, time <dbl>,
# pitlap_number <dbl>, pitnumber <dbl>, pit_time <dbl>, duration <chr>,
# quali_position <dbl>, q1 <chr>, q2 <chr>, q3 <chr>
str (dat) # structure of dataset
spc_tbl_ [630,584 × 30] (S3: spec_tbl_df/tbl_df/tbl/data.frame)
$ constructorId : num [1:630584] 1 1 1 1 1 1 1 1 1 1 ...
$ raceId : num [1:630584] 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 ...
$ driverId : num [1:630584] 4 4 4 4 4 4 4 4 4 4 ...
$ statusId : num [1:630584] 11 11 11 11 11 11 11 11 11 11 ...
$ circuitId : num [1:630584] 11 11 11 11 11 11 11 11 11 11 ...
$ race_name : chr [1:630584] "Hungarian Grand Prix" "Hungarian Grand Prix" "Hungarian Grand Prix" "Hungarian Grand Prix" ...
$ year : num [1:630584] 2018 2018 2018 2018 2018 ...
$ circuit : chr [1:630584] "Hungaroring" "Hungaroring" "Hungaroring" "Hungaroring" ...
$ country : chr [1:630584] "Hungary" "Hungary" "Hungary" "Hungary" ...
$ alt : num [1:630584] 264 264 264 264 264 264 264 264 264 264 ...
$ points : num [1:630584] 4 4 4 4 4 4 4 4 4 4 ...
$ laps : num [1:630584] 69 69 69 69 69 69 69 69 69 69 ...
$ fastestLapTime : chr [1:630584] "1:22.090" "1:22.090" "1:22.090" "1:22.090" ...
$ fastestLapSpeed : chr [1:630584] "192.125" "192.125" "192.125" "192.125" ...
$ constructor : chr [1:630584] "McLaren" "McLaren" "McLaren" "McLaren" ...
$ constructor_nationality: chr [1:630584] "British" "British" "British" "British" ...
$ forename : chr [1:630584] "Fernando" "Fernando" "Fernando" "Fernando" ...
$ surname : chr [1:630584] "Alonso" "Alonso" "Alonso" "Alonso" ...
$ driver_nationality : chr [1:630584] "Spanish" "Spanish" "Spanish" "Spanish" ...
$ status : chr [1:630584] "+1 Lap" "+1 Lap" "+1 Lap" "+1 Lap" ...
$ lap_number : num [1:630584] 68 15 55 44 27 38 4 33 67 36 ...
$ time : num [1:630584] 4920 5040 5100 5100 4980 4980 5160 5040 5100 4980 ...
$ pitlap_number : num [1:630584] 39 39 39 39 39 39 39 39 39 39 ...
$ pitnumber : num [1:630584] 1 1 1 1 1 1 1 1 1 1 ...
$ pit_time : num [1:630584] 58107 58107 58107 58107 58107 ...
$ duration : chr [1:630584] "21.795" "21.795" "21.795" "21.795" ...
$ quali_position : num [1:630584] 11 11 11 11 11 11 11 11 11 11 ...
$ q1 : chr [1:630584] "1:18.208" "1:18.208" "1:18.208" "1:18.208" ...
$ q2 : chr [1:630584] "1:35.214" "1:35.214" "1:35.214" "1:35.214" ...
$ q3 : chr [1:630584] "\\N" "\\N" "\\N" "\\N" ...
- attr(*, "spec")=List of 3
..$ cols :List of 30
.. ..$ constructorId : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ raceId : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ driverId : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ statusId : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ circuitId : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ race_name : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ year : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ circuit : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ country : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ alt : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ points : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ laps : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ fastestLapTime : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ fastestLapSpeed : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ constructor : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ constructor_nationality: list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ forename : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ surname : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ driver_nationality : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ status : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ lap_number : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ time : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ pitlap_number : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ pitnumber : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ pit_time : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ duration : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ quali_position : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
.. ..$ q1 : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ q2 : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
.. ..$ q3 : list()
.. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
..$ default: list()
.. ..- attr(*, "class")= chr [1:2] "collector_guess" "collector"
..$ delim : chr ","
..- attr(*, "class")= chr "col_spec"
- attr(*, "problems")=<externalptr>