[] 和 $ 运算符之间用于子集化的区别

Ray*_*Ray 3 r subset dataframe

我正在尝试使用变量名称对数据框进行子集化。我有它的工作,但有一部分我不太明白。

最初我有这个: rownames (mtcars[mtcars$hp >150,]).

然后,而不是硬编码“hp”,我想将“hp”分配给一个变量: foo <- "hp"和它的子集。我用这个让它工作: rownames (mtcars[mtcars[foo] >150,])。(感谢阻止我与运营商一起玩的链接$。)

但是,在我构建此声明时,我注意到两者之间存在差异。对于mtcars$hp > 150,我得到这个输出:

 [1] FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE FALSE FALSE FALSE FALSE  TRUE
[13]  TRUE  TRUE  TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE FALSE  TRUE
[25]  TRUE FALSE FALSE FALSE  TRUE  TRUE  TRUE FALSE
Run Code Online (Sandbox Code Playgroud)

对于mtcars[foo] > 150,我得到了这个:

                       hp
Mazda RX4           FALSE
Mazda RX4 Wag       FALSE
Datsun 710          FALSE
Hornet 4 Drive      FALSE
Hornet Sportabout    TRUE
...
Run Code Online (Sandbox Code Playgroud)

这两个是同一个“类型”吗?R 显示第一个没有行名而第二个显示行名有什么原因吗?

也许我天真地以为$[]或多或少等同。我可以得到相同的最终结果,但我很好奇并担心我的假设是否有误。“幸运”,我忽略了这个差异并继续并得到了相同的最终结果。

谢谢!

G. *_*eck 5

下面我们将使用一行数据框来提供更简洁的输出:

mtcars1 <- mtcars[1, ]
Run Code Online (Sandbox Code Playgroud)

请注意这些之间的差异。我们可以使用classas inclass(mtcars["hp"])来调查返回值的类。

前两个对应问题中的代码,分别返回一个数据帧和一个普通向量。之间的主要区别[$[(1)可以指定多个列;(2)允许的变量的传递作为索引和(3)返回的数据帧(虽然稍后参见实施例),而$(1)只能指定一个单一的列,(2)索引必须是硬编码的,(3)它返回一个向量。

mtcars1["hp"]  # returns data frame
##            hp
## Mazda RX4 110

mtcars1$hp # returns plain vector
## [1] 110
Run Code Online (Sandbox Code Playgroud)

index 是单个元素的其他示例。请注意,下面的第一个和第二个示例实际上与drop = TRUE默认示例相同。

mtcars1[, "hp"] # returns plain vector
## [1] 110  

mtcars1[, "hp", drop = TRUE] # returns plain vector
## [1] 110

mtcars1[, "hp", drop = FALSE] # returns data frame
##            hp
## Mazda RX4 110
Run Code Online (Sandbox Code Playgroud)

还有[[一个类似于$操作符的操作符,除了它可以接受一个变量作为索引,而$需要对索引进行硬编码:

mtcars1[["hp"]] # returns plain vector
## [1] 110
Run Code Online (Sandbox Code Playgroud)

其他索引指定多个元素的地方。$并且[[不能与多个元素一起使用,因此这些示例仅使用[

mtcars1[c("mpg", "hp")] # returns data frame
##           mpg  hp
## Mazda RX4  21 110

mtcars1[, c("mpg", "hp")] # returns data frame
##           mpg  hp
## Mazda RX4  21 110

mtcars1[, c("mpg", "hp"), drop = FALSE] # returns data frame
##           mpg  hp
## Mazda RX4  21 110

mtcars1[, c("mpg", "hp"), drop = TRUE] # returns list
## $mpg
## [1] 21
## 
## $hp
## [1] 110
Run Code Online (Sandbox Code Playgroud)

[

mtcars[foo]如果foo是具有多个元素的向量,则可以返回多于一列,例如mtcars[c("hp", "mpg")],并且在所有情况下,返回值都是 data.frame,即使foo只有一个元素(如问题中所示)。

还有mtcars[, foo, drop = FALSE]which 返回相同的值,mtcars[foo]所以它总是返回一个数据帧。在指定多列drop = TRUE的情况下,它将返回列表而不是 data.frame,foo如果指定单列,则返回列本身。

[[

另一方面,mtcars[[foo]]仅当 foo 有一个元素并且它返回该列而不是数据框时才有效。

$

mtcars$hp也仅适用于单个列,例如[[,并返回该列,而不是包含该列的数据框。

mtcars$hp就像mtcars[["hp"]]; 但是,不可能通过$. 只能用 硬编码索引$

subset

请注意,这有效:

subset(mtcars, hp > 150)
Run Code Online (Sandbox Code Playgroud)

返回包含hp列超过的那些行的数据框150

                     mpg cyl  disp  hp drat    wt  qsec vs am gear carb
Hornet Sportabout   18.7   8 360.0 175 3.15 3.440 17.02  0  0    3    2
Duster 360          14.3   8 360.0 245 3.21 3.570 15.84  0  0    3    4
Merc 450SE          16.4   8 275.8 180 3.07 4.070 17.40  0  0    3    3
Merc 450SL          17.3   8 275.8 180 3.07 3.730 17.60  0  0    3    3
Merc 450SLC         15.2   8 275.8 180 3.07 3.780 18.00  0  0    3    3
Cadillac Fleetwood  10.4   8 472.0 205 2.93 5.250 17.98  0  0    3    4
Lincoln Continental 10.4   8 460.0 215 3.00 5.424 17.82  0  0    3    4
Chrysler Imperial   14.7   8 440.0 230 3.23 5.345 17.42  0  0    3    4
Camaro Z28          13.3   8 350.0 245 3.73 3.840 15.41  0  0    3    4
Pontiac Firebird    19.2   8 400.0 175 3.08 3.845 17.05  0  0    3    2
Ford Pantera L      15.8   8 351.0 264 4.22 3.170 14.50  0  1    5    4
Ferrari Dino        19.7   6 145.0 175 3.62 2.770 15.50  0  1    5    6
Maserati Bora       15.0   8 301.0 335 3.54 3.570 14.60  0  1    5    8
Run Code Online (Sandbox Code Playgroud)

其他对象

以上涉及到的数据帧,但其他对象可以使用$[并且[[都会有自己的规则。特别是如果m是矩阵,例如m <- as.matrix(BOD),则m[, 1]是向量,不是一列矩阵,而是m[, 1, drop = FALSE]一列矩阵。 m[[1]]m[1]都是 的第一个元素m,而不是第一列。 m$a根本不起作用。

帮助

有关?Extract更多信息,请参阅。此外?"$"?"["?"[["都进入同一页面。