Package {discrtr} is a companion to the book Discrete Choice Analysis with R. It includes data sets and other supporting materials used in the book.
You can install the development version of discrtr from GitHub with:
# install.packages("devtools")
devtools::install_github("paezha/discrtr")
One data set included in the package relates to commuting in a university setting. Analysis of this data was reported by Whalen, P'{a}ez, and Carrasco (2012). The wide version of the data table can be loaded as follows:
library(discrtr)
data("mc_commute_wide")
This is a quick summary of the travel time variables in the table:
library(dplyr)
mc_commute_wide %>%
dplyr::select(starts_with("time.")) %>%
summary()
#> time.Cycle time.Walk time.HSR time.Car
#> Min. : 0.3106 Min. : 1.00 Min. : 1.00 Min. : 1.00
#> 1st Qu.: 2.9141 1st Qu.:10.00 1st Qu.: 4.00 1st Qu.: 5.00
#> Median : 4.3711 Median :15.00 Median : 8.00 Median :10.00
#> Mean : 5.4278 Mean :16.09 Mean : 16.82 Mean :12.86
#> 3rd Qu.: 6.2112 3rd Qu.:20.00 3rd Qu.: 20.00 3rd Qu.:20.00
#> Max. :45.0000 Max. :62.11 Max. :120.00 Max. :72.00
#> NA's :997 NA's :513 NA's :54 NA's :622
There are four modes of transportation in this data set, but not all modes were available to every respondent, hence the NA’s. A missing value for any of the time variables indicates that the mode was not part of the choice set for the corresponding traveller.
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.