2017-06-01 45 views
4

有時我會意外地創建一個與data.frame中的列具有相同名稱的變量,然後在dplyr函數中使用該變量。該名稱通常被視爲列名稱而非變量名稱。見如下例子:dplyr函數如何區分具有相同名稱的列和變量?

library(dplyr) 

packageVersion("dplyr") 
#> [1] '0.6.0' 
mtcars %>% filter(mpg == 21) 
#> mpg cyl disp hp drat wt qsec vs am gear carb 
#> 1 21 6 160 110 3.9 2.620 16.46 0 1 4 4 
#> 2 21 6 160 110 3.9 2.875 17.02 0 1 4 4 
mpg.val <- 21 
mtcars %>% filter(mpg == mpg.val) 
#> mpg cyl disp hp drat wt qsec vs am gear carb 
#> 1 21 6 160 110 3.9 2.620 16.46 0 1 4 4 
#> 2 21 6 160 110 3.9 2.875 17.02 0 1 4 4 
mpg <- 21 
mtcars %>% filter(mpg == mpg) 
#>  mpg cyl disp hp drat wt qsec vs am gear carb 
#> 1 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 
#> 2 21.0 6 160.0 110 3.90 2.875 17.02 0 1 4 4 
#> 3 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1 
#> 4 21.4 6 258.0 110 3.08 3.215 19.44 1 0 3 1 
#> ... 

在第三種情況下,如何告訴過濾器,第二mpg是一個變量名沒有列名,得到的結果是前兩種情況? (另外我使用dplyr 0.6.0。)


get結果通過reprex產生:

mpg <- 21 
mtcars %>% filter(mpg == get("mpg")) 
#>  mpg cyl disp hp drat wt qsec vs am gear carb 
#> 1 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 
#> 2 21.0 6 160.0 110 3.90 2.875 17.02 0 1 4 4 
#> 3 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1 
#> 4 21.4 6 258.0 110 3.08 3.215 19.44 1 0 3 1 
#> ... 

添加環境下工作:

mtcars %>% filter(mpg == get("mpg", .GlobalEnv)) 
# mpg cyl disp hp drat wt qsec vs am gear carb 
#1 21 6 160 110 3.9 2.620 16.46 0 1 4 4 
#2 21 6 160 110 3.9 2.875 17.02 0 1 4 4 
+0

可能的副本[dplyr的過濾器中的非標準評估(NSE)\ _&從MySQL中提取數據](https://stackoverflow.com/questions/26492280/non-standard-evaluation-nse-in-dplyrs-filter-pulling -data-from-mysql) –

+0

@AdamQuek,鏈接的問題如何解決我的問題?你能解釋一下嗎? – mt1022

+0

@ mt1022'mtcars%>%filter(mpg == get(「mpg」))'適用於我。 'dplyr 0.5.0' –

回答

1

我們可以使用.GlobalEnv

mtcars %>% 
    filter(mpg == .GlobalEnv$mpg) 
# mpg cyl disp hp drat wt qsec vs am gear carb 
#1 21 6 160 110 3.9 2.620 16.46 0 1 4 4 
#2 21 6 160 110 3.9 2.875 17.02 0 1 4 4 
+4

或'mtcars%>%filter(mpg == get(「mpg」))'。 –

+0

@RomanLuštrik,'get'不起作用。 – mt1022

相關問題