plotly：ドロップダウン選択によるデータの更新

Question

これが可能かどうかはわかりませんが、ここでは何をしたいのですか？ドロップダウンメニューから選択してプロットしたプロットのデータを更新したいと思います。

簡単な例として、私は散布図でdf$xとdf$yを使用し、そこからデータフレーム

df <- data.frame(x = runif(200), y = runif(200), z = runif(200)) 

を有していると仮定することができます。私は、ドロップダウンを使用して達成したいデータ操作の2つのシナリオ：

1. は、私は次の2つの例を見てdf$xとdf$y

の唯一の最初のn値df$z

プロットでdf$yを交換してください私は簡単に再現することができます： https://plot.ly/r/dropdowns/

しかし、私はどのようにinfドロップダウン選択に基づいてプロットされるデータに関する指定。例えばシナリオ2の場合。私はargs = list("data", df[1:n,])でそれを試しましたが動作しませんでした。

シナリオ1の場合、（例によると）唯一の（？）方法はそれぞれトレースを隠している/表示しているようです。これはシナリオ2の唯一の方法ですか？

いずれかの代替案がありますか？

更新1：だからここ

再現性の例を追加しますが、私はここに、シナリオ1

require(plotly) 
df <- data.frame(x = runif(200), y = runif(200), z = runif(200)) 
Sys.setenv("plotly_username"="xxx") #actual credentials replaced 
Sys.setenv("plotly_api_key"="xxx") #actual credentials replaced 

p <- plot_ly(df, x = df$x, y = df$y, mode = "markers", name = "A", visible = T) %>% 
    add_trace(mode = "markers", y = df$z, name = "B", visible = T) %>% 
    layout(
    title = "Drop down menus - Styling", 
    xaxis = list(domain = c(0.1, 1)), 
    yaxis = list(title = "y"), 
    updatemenus = list(
     list(
     y = 0.7, 
     buttons = list(
      list(method = "restyle", 
       args = list("visible", list(TRUE, TRUE)), 
       label = "Show All"), 

      list(method = "restyle", 
       args = list("visible", list(TRUE, FALSE)), 
       label = "Show A"), 

      list(method = "restyle", 
       args = list("visible", list(FALSE, TRUE)), 
       label = "Show B"))) 
    )) 

plotly_POST(p) 

結果で希望のものを達成例である：https://plot.ly/~spietrzyk/96/drop-down-menus-styling/ をこれはからの例に基づいていますhttps://plot.ly/r/dropdowns/

しかし、の変更をトリガーする代わりに、プロットするデータを渡すことができるかどうかは疑問です個々のトレースのプロパティ。

私が試した一つのことは、以下の通りであった：ここ

p <- plot_ly(df, x = df$x, y = df$y, mode = "markers", name = "A", visible = T) %>% 
    layout(
    title = "Drop down menus - Styling", 
    xaxis = list(domain = c(0.1, 1)), 
    yaxis = list(title = "y"), 
    updatemenus = list(
     list(
     y = 0.7, 
     buttons = list(
      list(method = "restyle", 
       args = list("y", df$y), 
       label = "Show A"), 
      list(method = "restyle", 
       args = list("y", df$z), 
       label = "Show B"))) 
)) 

結果：df$zからのデータがグリッド（https://plot.ly/~spietrzyk/99/）に掲載されていないとして、このアプローチhttps://plot.ly/~spietrzyk/98/drop-down-menus-styling/ 、動作することはできません。

私は、すべてのトレースをプロットし、ドロップダウン選択でvisibleプロパティを切り替える以外に、ドロップダウン選択に基づいてプロットされるデータを操作することはとにかく思っていました。

Answer 1

これはあなたの後のことですか？

require(plotly) 
df <- data.frame(x = runif(200), y = runif(200), z = runif(200)) 
p <- plot_ly(df, x = ~x, y = ~y, mode = "markers", name = "A", visible = T) %>% 
layout(
    title = "Drop down menus - Styling", 
    xaxis = list(domain = c(0.1, 1)), 
    yaxis = list(title = "y"), 
    updatemenus = list(
    list(
     y = 0.7, 
     buttons = list(
     list(method = "restyle", 
      args = list("y", list(df$y)), # put it in a list 
      label = "Show A"), 
     list(method = "restyle", 
      args = list("y", list(df$z)), # put it in a list 
      label = "Show B"))) 
)) 
p