パイプを不等式にどのように供給するのですか？

Question

これは複数のインスタンスに現れています。この現在のインスタンスが、これが私のために発生する多くのケースに一般化できるのかどうかはわかりませんが、答えがほんとうにあるかもしれません。

これは、データ処理をしているときにパイプの結果を評価したい場合に最も簡単なバージョンです。簡単な例は次のようになります。

多くの状況で

> seq(9) %>% > 4 
Error: unexpected '>' in "seq(9) %>% >" 
> seq(9) %>% . > 4 
Error in .(.) : could not find function "." 

所望の出力が論理ベクトルになる

FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE 

私はいくつかのパイプ出力に評価したいが、それを割り当て、その後の評価を実行する必要がありますそれは働く：

seq(9) -> vec 
vec > 4 

パイプチェーン内でこれらの種類の評価を完全に完了する方法はありますか？

Answer 1

パイプを使用する場合は中括弧を使用する必要があります。

seq(9) %>% {. > 4} 

[1] FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE 

あなたは、物事のこれらの種類をパイプするつもりなら、それはもう少し読みやすいコードになりますように私は、purrrを使用してお勧めします。やや広い文脈で

library(purrr) 

map_lgl(seq(9), ~.x > 4) 

[1] FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE 

Answer 2

、これは簡単にmutateで行われます。

library(dplyr) 
data_frame(x=1:9) %>% mutate(big_x = x>4) 

迷惑な意見：あなたは主に、原子ベクターで作業している場合、私はそのtidyverse /配管アプローチを疑いますそれは価値があるよりも多くのトラブルになるだろう。もう1つの答えが示唆しているように、purrrを使用することができますが、やはり基底Rが完全にうまくいくかもしれません。あなたの問題のコンテキストを増やすことが役に立ちます。

Answer 3

magrittrは、バイナリ演算子をパイプ可能な関数に変換するための "エイリアス"を提供します。私は彼らのために自分を気にしないが、あなたは

library(magrittr) 
seq(9) %>% is_greater_than(4) 

（+の別名である）?addで完全なリストを参照してくださいを行うことができます。 +から[[までのすべての実装があります。

Answer 4

もう一つの選択肢は、機能ではなく演算子として>機能を呼び出すことです：

> seq(9) %>% `>`(4) 
[1] FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE 
> seq(9) %>% '>'(4) 
[1] FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE 

私はバッククォートはほとんど意味をなさないと思いますが、通常の引用符は、この場合にも動作しません。