data/carsafety.R

"carsafety" <-
structure(list(Make.model = structure(c(29, 7, 30, 33, 14, 23, 
16, 6, 1, 27, 20, 3, 4, 18, 17, 31, 10, 15, 13, 22, 21, 24, 28, 
5, 8, 19, 11, 25, 32, 2, 9, 26, 12), .Label = c("Buick Century", 
"Chevrolet Cavalier", "Chevrolet Malibu", "Chevrolet Suburban", 
"Chevrolet Tahoe", "Chevrolet Venture", "Chrysler Town & Country", 
"Dodge Stratus", "Dodge neon", "Ford Expedition", "Ford Explorer", 
"Ford F-Series", "Ford Taurus", "Ford Windstar", "GMC Jimmy", 
"Honda Accord", "Honda Civic", "Jeep Grand Cherokee", "Lincoln TownCar", 
"Mazda 626", "Mercury Marquis", "Nissan Altima", "Nissan Maxima", 
"Nissan Sentra", "Pontiac Grand Am", "Pontiac Sunfire", "Subura Outback", 
"Toyota 4Runner", "Toyota Avalon", "Toyota Camry", "Toyota Corolla", 
"Toyota Tacoma", "Volkswagen jetta"), class = "factor"), type = structure(c(3, 
5, 4, 7, 5, 4, 4, 5, 4, 2, 2, 4, 1, 1, 7, 7, 1, 1, 4, 2, 3, 7, 
1, 1, 4, 3, 1, 2, 6, 7, 7, 7, 6), .Label = c("SUV", "compact", 
"large", "midsize", "minivan", "pickup", "subcompact"), class = "factor"), 
    Driver.deaths = c(40, 31, 41, 47, 37, 53, 54, 51, 70, 74, 
    70, 71, 46, 61, 84, 83, 55, 76, 78, 72, 80, 94, 94, 68, 103, 
    100, 88, 118, 111, 146, 161, 158, 110), Other.deaths = c(20, 
    36, 29, 23, 35, 26, 27, 34, 23, 24, 29, 34, 59, 44, 25, 29, 
    57, 39, 39, 49, 43, 34, 43, 74, 40, 47, 60, 39, 59, 41, 39, 
    44, 128)), .Names = c("Make.model", "type", "Driver.deaths", 
"Other.deaths"), row.names = c("Toyota Avalon", "Chrysler Town & Country", 
"Toyota Camry", "Volkswagen jetta", "Ford Windstar", "Nissan Maxima", 
"Honda Accord", "Chevrolet Venture", "Buick Century", "Subura Outback", 
"Mazda 626", "Chevrolet Malibu", "Chevrolet Suburban", "Jeep Grand Cherokee", 
"Honda Civic", "Toyota Corolla", "Ford Expedition", "GMC Jimmy", 
"Ford Taurus", "Nissan Altima", "Mercury Marquis", "Nissan Sentra", 
"Toyota 4Runner", "Chevrolet Tahoe", "Dodge Stratus", "Lincoln TownCar", 
"Ford Explorer", "Pontiac Grand Am", "Toyota Tacoma", "Chevrolet Cavalier", 
"Dodge neon", "Pontiac Sunfire", "Ford F-Series"), class = "data.frame")
jverzani/UsingR documentation built on Aug. 3, 2020, 11:57 a.m.