1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
| selec <- dplyr::inner_join(mtcars1, mtcars2)
#> Joining, by = c("mpg", "cyl", "disp", "hp", "drat", "wt", "qsec", "vs", "am", "gear", "carb", "modele")
selec
#> mpg cyl disp hp drat wt qsec vs am gear carb modele
#> 1 22.8 4 140.8 95 3.92 3.150 22.90 1 0 4 2 Merc 230
#> 2 19.2 6 167.6 123 3.92 3.440 18.30 1 0 4 4 Merc 280
#> 3 17.8 6 167.6 123 3.92 3.440 18.90 1 0 4 4 Merc 280C
#> 4 16.4 8 275.8 180 3.07 4.070 17.40 0 0 3 3 Merc 450SE
#> 5 17.3 8 275.8 180 3.07 3.730 17.60 0 0 3 3 Merc 450SL
#> 6 15.2 8 275.8 180 3.07 3.780 18.00 0 0 3 3 Merc 450SLC
#> 7 10.4 8 472.0 205 2.93 5.250 17.98 0 0 3 4 Cadillac Fleetwood
#> 8 10.4 8 460.0 215 3.00 5.424 17.82 0 0 3 4 Lincoln Continental
#> 9 14.7 8 440.0 230 3.23 5.345 17.42 0 0 3 4 Chrysler Imperial
#> 10 32.4 4 78.7 66 4.08 2.200 19.47 1 1 4 1 Fiat 128
#> 11 30.4 4 75.7 52 4.93 1.615 18.52 1 1 4 2 Honda Civic
#> 12 33.9 4 71.1 65 4.22 1.835 19.90 1 1 4 1 Toyota Corolla
#> 13 21.5 4 120.1 97 3.70 2.465 20.01 1 0 3 1 Toyota Corona
#> 14 15.5 8 318.0 150 2.76 3.520 16.87 0 0 3 2 Dodge Challenger
#> 15 15.2 8 304.0 150 3.15 3.435 17.30 0 0 3 2 AMC Javelin
#> 16 13.3 8 350.0 245 3.73 3.840 15.41 0 0 3 4 Camaro Z28
# Created on 2020-12-28 by the reprex package (v0.3.0) |
Partager