`nest_`を使用した数式での変数の引用

Question

私はtidyverse関数のエスケープハッチバージョンを数式インタフェースで使用していますが、 ' - 'にnest_が含まれている場合、いくつか問題があります。

このチャンクは動作しますが：同様の

select_(mtcars, ~ -cyl) 

何かがxのnest_

nest_(mtcars, ~ -cyl) 

エラー[[I]] <のために動作しません - 値：無効な下付きタイプ「言語'

動作させる方法はありますか？残りの列をすべて書き込むのはどうですか？

Answer 1

あなたが与えた例では、実際には標準評価（SE）バージョンは必要ありません。あなただけ~なしnestを使用することができます。

library(tidyr) 

mtcars %>% nest(-cyl) 
#> # A tibble: 3 x 2 
#>  cyl    data 
#> <dbl>    <list> 
#> 1  6 <tibble [7 x 10]> 
#> 2  4 <tibble [11 x 10]> 
#> 3  8 <tibble [14 x 10]> 

あなたの本当の場合はもっと複雑であり、SEが必要ない場合は、しかし、tidyverseはrlangベースのNSEシステムへの切り替えの過程であることに注意してください、*_バージョンではこのような何かのために廃止されますので：

mtcars %>% nest(-!!rlang::quo(cyl)) 
#> # A tibble: 3 x 2 
#>  cyl    data 
#> <dbl>    <list> 
#> 1  6 <tibble [7 x 10]> 
#> 2  4 <tibble [11 x 10]> 
#> 3  8 <tibble [14 x 10]> 

または文字列と、

mtcars %>% nest(-!!rlang::sym('cyl')) 
#> # A tibble: 3 x 2 
#>  cyl    data 
#> <dbl>    <list> 
#> 1  6 <tibble [7 x 10]> 
#> 2  4 <tibble [11 x 10]> 
#> 3  8 <tibble [14 x 10]> 

GitHubからtidyrをインストールすると、どちらも既に動作します。あなたが本当にとにかく動作する古いスタイルを取得したい場合、あなたはそれがそうのように、等価的に動作させることができます。

mtcars %>% nest_('data', names(.)[names(.) != 'cyl']) 
#> # A tibble: 3 x 2 
#>  cyl    data 
#> <dbl>    <list> 
#> 1  6 <tibble [7 x 10]> 
#> 2  4 <tibble [11 x 10]> 
#> 3  8 <tibble [14 x 10]>