Annual model-level car sales in the United States
data('blp_1995')
A data.frame with 2217 observations on 13 variables:
model_name: Name of car model
model_id: Numeric identifier for car model
firm_id: Numeric identifier for production firm
time_id: Numeric identifier for year of sale
price: price - mean(price)
mpd: Miles per dollar
air: ==1 if car has airconditioning
mpg: Miles per gallon
space: Space inside vehicle
hpwt: Horsepower per pound
share: Market share of vehicle
outshr: Outside share
y: outcome variable defined as log(share) - log(outshr)
Data Source: Berry, Levinsohn and Pakes, 1995, "Automobile Prices in Market Equilibrium", Econometrica
str(blp_1995)#> Classes ‘tbl_df’, ‘tbl’ and 'data.frame': 2217 obs. of 13 variables: #> $ model_name: chr "AMGREM" "AMHORN" "AMJAVL" "AMMATA" ... #> $ model_id : int 23 24 25 26 18 53 45 40 41 50 ... #> $ firm_id : int 15 15 15 15 15 19 19 19 19 19 ... #> $ time_id : int 1 1 1 1 1 1 1 1 1 1 ... #> $ price : num -6.83 -6.25 -4.65 -4.92 -2.83 ... #> $ mpd : num 1.89 1.94 1.72 1.69 1.5 ... #> $ air : int 0 0 0 0 0 0 0 0 0 0 ... #> $ mpg : num 1.7 1.74 1.54 1.52 1.35 ... #> $ space : num 1.15 1.28 1.46 1.61 1.65 ... #> $ hpwt : num 0.529 0.494 0.468 0.427 0.452 ... #> $ share : num 0.001051 0.00067 0.000341 0.000522 0.000442 ... #> $ outshr : num 0.88 0.88 0.88 0.88 0.88 ... #> $ y : num 0.8204 0.37 -0.3069 0.1207 -0.0451 ... #> - attr(*, "spec")=List of 2 #> ..$ cols :List of 15 #> .. ..$ model.name: list() #> .. .. ..- attr(*, "class")= chr "collector_character" "collector" #> .. ..$ model.id : list() #> .. .. ..- attr(*, "class")= chr "collector_integer" "collector" #> .. ..$ firm.id : list() #> .. .. ..- attr(*, "class")= chr "collector_integer" "collector" #> .. ..$ cdid : list() #> .. .. ..- attr(*, "class")= chr "collector_integer" "collector" #> .. ..$ id : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ price : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ mpd : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ air : list() #> .. .. ..- attr(*, "class")= chr "collector_integer" "collector" #> .. ..$ mpg : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ space : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ hpwt : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ trend : list() #> .. .. ..- attr(*, "class")= chr "collector_integer" "collector" #> .. ..$ share : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ outshr : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> .. ..$ y : list() #> .. .. ..- attr(*, "class")= chr "collector_double" "collector" #> ..$ default: list() #> .. ..- attr(*, "class")= chr "collector_guess" "collector" #> ..- attr(*, "class")= chr "col_spec"