r - ggvis R で折れ線グラフの 2 次 y 軸を作成する

Question

これは、R の ggvis パッケージでこれまでに得たものです。

    mtcars %>% ggvis(x = ~disp) %>% 
    layer_lines(y = ~wt, stroke := "red") %>%
    layer_lines(y = ~mpg) %>%
    add_axis("y", orient = "left", title = "Weight (lb/1000)") %>%
    add_axis("y", orient = "right", title= "Miles/(US) gallon") %>%
    add_axis("x", title = "Displacement (cu.in.)")

wt スケール データを表す左 Y 軸を取得できません。

これは以下を出力します: