使用应该返回数字和字符列的数据框

Question

我在R中有一个内置数据集，名为"mpg"。当我输入

df(,c[1,2,"year"])

结果（应打印相应表格）应为

**manufactures**  **model**  **year**
1) audi        a4.    1999
2) audi.       a4.    1999
    .           .      .
    .           .      .
    .           .      .
224) 

Answer 1

如果要混合使用子集构成数据框的列的方式，可以使用dplyr。

样本数据集：

1    C        0.011987266    -0.003842185     0.006578784
2    H        1.097152909    -0.003956163     0.013339310
3    H       -0.349612312     1.019316731     0.001903075
4    H       -0.344276148    -0.517463019    -0.880495291
5    H       -0.355315644    -0.513266496     0.891567896

1    C        0.011987266    -0.003842185     0.006578784
2    H        1.097152909    -0.003956163     0.013339310
3    H       -0.349612312     1.019316731     0.001903075
4    H       -0.344276148    -0.517463019    -0.880495291
5    H       -0.355315644    -0.513266496     0.891567896

1    C        0.011987266    -0.003842185     0.006578784
2    H        1.097152909    -0.003956163     0.013339310
3    H       -0.349612312     1.019316731     0.001903075
4    H       -0.344276148    -0.517463019    -0.880495291
5    H       -0.355315644    -0.513266496     0.891567896

代码

mtcars

                     mpg cyl  disp  hp drat    wt  qsec vs am gear carb
Mazda RX4           21.0   6 160.0 110 3.90 2.620 16.46  0  1    4    4
Mazda RX4 Wag       21.0   6 160.0 110 3.90 2.875 17.02  0  1    4    4
Datsun 710          22.8   4 108.0  93 3.85 2.320 18.61  1  1    4    1
Hornet 4 Drive      21.4   6 258.0 110 3.08 3.215 19.44  1  0    3    1
Hornet Sportabout   18.7   8 360.0 175 3.15 3.440 17.02  0  0    3    2

输出

library(dplyr)

mtcars %>% select(1, 2, "drat")

Answer 2

mpg[,c(1,2,4)]

这就是您要寻找的。

或

mpg[, c("manufacturer", "model", "year")]