为不同的变量获取单独的图形线
Get separate graphed lines for different variables
我有一个具有以下结构的变量 data
:
week: int 1 1 2 2 3 3 4 4 5 5 ...
earn: int 2 3 2 7 8 9 2 6 4 2 ...
name: chr "C", "A", "C", "A" ...
每个名字(人)都有一周的收入。所以从上面我们可以看出,C 在第 1 周赚了 2,而 A 在第 1 周赚了 3。C 在第二周赚了 2,而 A 在这周也赚了 7。
我想把它画在折线图上。下面是我试过的。
p <- plot.ly(data, x = data$week, name = "Week", type = "scatter", mode = "lines") %>%
add_trace(y = data$earn, name = "earn", mode = "lines+markers) %>%
add_trace(y = data$earn, name = "earn", mode = "markers")
p
但是,这给出了一个图表,其中第一周的标记有 (2,3),因为这都是本周的收入。但是我想要两行,这样可以清楚地看到两个名字的收入差异。
定义颜色会给你想要的。
p <- plot_ly(data, x = ~week, y = ~ earn) %>%
add_lines(color = ~name) %>%
add_markers(color = ~name, showlegend = FALSE)
p
或者您也可以使用:
p <- plot_ly(data=data, x = ~week, y = ~ earn) %>%
add_traces(color = ~name, mode = "lines+markers")
p
我有一个具有以下结构的变量 data
:
week: int 1 1 2 2 3 3 4 4 5 5 ...
earn: int 2 3 2 7 8 9 2 6 4 2 ...
name: chr "C", "A", "C", "A" ...
每个名字(人)都有一周的收入。所以从上面我们可以看出,C 在第 1 周赚了 2,而 A 在第 1 周赚了 3。C 在第二周赚了 2,而 A 在这周也赚了 7。
我想把它画在折线图上。下面是我试过的。
p <- plot.ly(data, x = data$week, name = "Week", type = "scatter", mode = "lines") %>%
add_trace(y = data$earn, name = "earn", mode = "lines+markers) %>%
add_trace(y = data$earn, name = "earn", mode = "markers")
p
但是,这给出了一个图表,其中第一周的标记有 (2,3),因为这都是本周的收入。但是我想要两行,这样可以清楚地看到两个名字的收入差异。
定义颜色会给你想要的。
p <- plot_ly(data, x = ~week, y = ~ earn) %>%
add_lines(color = ~name) %>%
add_markers(color = ~name, showlegend = FALSE)
p
或者您也可以使用:
p <- plot_ly(data=data, x = ~week, y = ~ earn) %>%
add_traces(color = ~name, mode = "lines+markers")
p