r shiny ggvis

trazar 2 variables en el eje Y, usando ggvis en R



shiny (2)

Tengo un conjunto de datos que se parece a esto

"YEAR","A","B" 2001,100,177 2002,154,419 2003,334,190 2012,301,90

.. y muchas más filas.

Las columnas de "AÑO" van de 2001 a 2013. Tengo el conjunto de datos cargado en data.table "DT"

Quiero trazar un gráfico con AÑO en el eje X y gráficos de líneas para A y B en el eje Y.

En otras palabras, tengo que combinar estos dos gráficos en uno.

DT %>% ggvis(~YEAR, ~A) %>% layer_lines() DT %>% ggvis(~YEAR, ~B) %>% layer_lines()

Sé la manera de hacerlo con ggplot2 pero no pude encontrar la manera de ggvis. Será genial incluso si pudiera hacerlo en brillante. Tu ayuda es altamente apreciada.


Prueba esto:

DT %>% ggvis(~YEAR, ~A) %>% layer_lines()%>%layer_lines(x=~YEAR, y=~B)


Puedes hacerlo de esta manera:

library(ggvis) DT %>% ggvis(x= ~YEAR) %>% layer_lines(y= ~A, stroke:=''blue'') %>% layer_lines(y= ~B, stroke:=''orange'')

Supongo que también necesita diferentes colores para cada línea para poder distinguir los grupos, así que agregué el argumento de stroke .

Salida:

Probablemente sería aún mejor si derrites el data.frame primero y luego traza con el argumento del trazo que también devolvería una leyenda. Me gusta esto:

library(reshape2) DT2 <- melt(DT, ''YEAR'', c(''A'',''B'')) DT2 %>% ggvis(~YEAR, ~value, stroke=~variable) %>% layer_lines()