【发布时间】:2020-06-28 13:00:24
【问题描述】:
代码
library(shiny)
library(ggplot2)
library(reshape2)
library(plotly)
data <- read.csv("https://covid.ourworldindata.org/data/full_data.csv")
data$date <- as.Date(data$date, format = "%Y-%m-%d")
class(data$date)
data$location <- as.character(data$location)
ggplot(data = data, mapping = aes(x = date, y = total_cases, color = location)) +
geom_line()
【问题讨论】:
-
你正在使用 ggplotly?上面的情节似乎是这样的