njtr1 is a package that makes it easy to download New Jersey car crash data that is released by the New Jersey Department of Transportation. This package makes it easy to access detailed information on a statewide or county-by-county process that can assist those interested in studying trends in vehicle crashes in New Jersey.

Usage

The main function of this package is get_njtr1(). This function allows you to specify the specific table of NJTR-1 data that you’d like to query for a given year.

There are 5 different tables available with NJTR-1 data and published by the NJDOT. We will take a look at each of them in the following examples.

Accidents

get_njtr1(year = 2019, type = "Accidents")

Drivers

get_njtr1(year = 2019, type = "Drivers")

Vehicles

get_njtr1(year = 2019, type = "Vehicles")

Insurance company data

Each of the vehicle records contain a field name insurance_company_code that identifies the name of the insurance company that covers the vehicle involved in an accident.

This code can be used to join the vehicle data with a dataset containing details for every insurance company that does business in New Jersey.

Access the insurance from the package like so:

data("insurance")
head(insurance)
## # A tibble: 6 × 9
##   ID_NO NAME               ADDRESS_1 ADDRESS_2 ADDRESS_3 CITY  STATE ZIP   NOTES
##   <chr> <chr>              <chr>     <chr>     <chr>     <chr> <chr> <chr> <chr>
## 1 001   SAMSUNG FIRE AND … 25 CHALL… NA        NA        RIDG… NJ    07660 COMM…
## 2 002   BROTHERHOOD MUTUA… PO BOX 2… NA        NA        FORT… IN    07661 COMM…
## 3 003   MID-CENTURY INS C… 4680 WIL… NA        NA        LOS … CA    07662 PRIV…
## 4 004   ACE PROPERTY & CA… 1601 CHE… PO BOX 4… NA        PHIL… PA    07663 COMM…
## 5 005   FIRST NONPROFIT I… 111 NORT… SUITE 801 NA        CHIC… IL    07664 COMM…
## 6 006   EVEREST PREMIER I… 477 MART… NA        NA        LIBE… NJ    07665 COMM…

The insurance dataset contains a field ID_NO which is the same as insurance_company_code in the Vehicles table. This common field can be used for performing join operations.

Pedestrians

get_njtr1(year = 2019, type = "Pedestrians")

Occupants

get_njtr1(year = 2019, type = "Occupants")