tidyeval

1熱

1答えて

なぜ式のLHS内の `rlang :: sym`と` rlang :: quo_name`も同様に動作しますか？

foo(c("b"))を使用して以下の関数を呼び出します。出力はインラインで表示されます。私はなぜ（1）df %>% mutate(!!x_ := 100 + !!x))と（2）df %>% mutate(!!x := 100 + !!x))が同じように動作するのか混乱しています。 dplyr programming recipesに基づいてのみ動作するはずです（1）。 foo <- funct

1熱

3答えて

dplyr tidyevalに相当するアンダースコア関数のバージョン

dplyrのリニューアル版では、filter_などの関数のアンダースコアバージョンは、tidy evaluationになります。新しい方法で期待される新しいアンダースコアフォームはどんなものですか？ R CMDチェックで未定義シンボルを回避する方法を書いていますか？ library(dplyr) df <- data_frame(id = rep(c("a","b"), 3), val =

0熱

1答えて

式で非標準的な評価を使用して

私はnon-standard evaluationを使用して列の意味を追跡するパッケージを作成しています。パッケージは関数間でデータフレームを渡します。さまざまなことが同じ列セットを実行します。非標準の評価はこのために素晴らしい作品： my_lm <- function(df, xcol, ycol) { new_lm <- lm(!!xcol, !!ycol, data=df)

3熱

3答えて

私はdplyr使用して列のベクトルを削除したい列にtidyeval方法

を削除する> =次のように< 0.7は働い0.7 library(dplyr) data(mtcars) rem_cols <- c("wt", "qsec", "vs", "am", "gear", "carb") head(select(mtcars, !!paste0("-", rem_cols))) Error: Strings must match column names.

7熱

3答えて

purrrを使ってきちんとした評価関数をループする方法は？

私は次のデータセット（サンプル）があります：私は手動で列名を入力プログラムときには正常に動作します get_charts1 <- function(mygroup){ quo_var <- enquo(mygroup) train %>% group_by(!!quo_var) %>% count() %>% ungroup() %>%

0熱

1答えて

dplyr - NSEでの文字列ベースのフィルタリング

私のデータ上のfilterのダイナミックに対して、dplyrの新しいNSE表記（バージョン> = 0.6）を使用したいと思います。今私は私が行うことができます知っている5以上の値の列tofilter = "x"をフィルタリングする場合 df = data_frame(x = 1:10, y = 10:1, z = 10 * runif(10)) ：：のは、私は次のようにダミーのデータセットを持

1熱

3答えて

dplyrとgroup_byを使用して独自の関数を書く - 変更された列名を使用する方法

2つの変数でグループ化された観測数を与えるテーブルを公開する必要があります。このコードは正常に動作します。しかし、私はこれを機能に変えようとすると問題に遭遇しました。テーブルの機能の外コード：：これは library(tidyverse) tab1 <- mtcars %>% count(cyl) %>% rename(Total = n) tab2 <- mtcars %>%

0熱

2答えて

関数内の列名のリストを含むTidyeval

列名のリストをdplyr関数に渡す関数を作成しようとしています。私は、列名のリストが...形で与えられた場合tidyeval文書で説明したように、これを行う方法を知っている： df <- tibble( g1 = c(1, 1, 2, 2, 2), g2 = c(1, 2, 1, 2, 1), a = sample(5), b = sample(5) )

8熱

4答えて

dplyrとggplotの両方に関数の引数を渡します

dplyrとggplotのコードに関数の引数を渡す方法が混乱しています。私はここでdplyrとggplot2 の最新バージョンを使用してbarplot（平均価格対明瞭度）を生成するために私のコードですよ diamond.plot<- function (data, group, metric) { group<- quo(group) metric<- quo(metric)

0熱

1答えて

tidyevalでmap2を引用符で囲まずに

「実行」やデータの欠落数を計算する関数を作成しています - これをdplyr::group_byと併用したいので、これをS3メソッドとして記述しました。このコードの簡単な例。残念ながら、引用符で囲まれていない変数名は機能しませんが、これを引用すると、これは不思議なことです。以下はあなたの第二の入力（varが）最初の入力（dataグループ化/ネストされた）と一緒に変更されていないので、あなたが実