r - Rでggvisを使用したinput_select（）による動的フィルタリング

Question

Rのパッケージに付属する組み込みの「コカイン」データベースを使用してggvis、各状態のコカインの効能を視覚化しています。R パッケージdplyrも使用されました。

cocaineデータセットの最初の 6 行は次のとおりです。

 state potency weight month price
1    WA      77    217     1  5000
2    CT      51    248     1  4800
3    FL      68     43     1  3500
4    OH      69    123     1  3500
5    MS      75    118     1  3400
6    VA      73    127     1  3000

目標はinput_select()、ggvis パッケージ内で使用して、さまざまな状態を選択し、その状態の効力カウントのヒストグラムを表示できるドロップダウン メニューを作成することでした。このコードでそれを行うことができました：

state <- as.vector(unique(cocaine$state))

cocaine %>%
          ggvis(~potency) %>%
            filter(state == eval(input_select(
            choices = state,
            selected = "NY",
            label = "State"))) %>%
          layer_histograms(binwidth = 2)

input_select()問題は、式を によって「評価」する必要がある理由ですeval()。はパッケージfilterの関数であるため、環境内で と通信していないためと推測できます。したがって、環境内で初期化します。おそらく、誰かがこれを視覚化するのに役立つ概念を教えてくれるでしょうか?dplyrggvisevalggvis