ggplot2 R 图表答案

【问题标题】：ggplot2 R chartsggplot2 R 图表
【发布时间】：2021-05-27 08:50:20
【问题描述】：

我是 R 新手，从基本情节开始。我使用了一个简单的 excel 表，其中包含以下列 - Family、Family Name、Product.ID、Sales、Time、Value

表格类似于下面的快照

我使用了下面的代码，但由于某种原因，当我尝试按姓氏对图表进行分组时，它只显示一种颜色，甚至家族名称中的所有值都没有显示图例

library("ggplot2")
library("data.table")
library("readxl")
Data<-read.xlsx("C:/Users/vc/Desktop/Sales Data.xlsx")
setDT(Data)
Plot<-ggplot(data = Data,
             aes(x=Time,y=Value,group='Family Name',shape='Family Name',color='Family Name')) +
  geom_line() + 
  geom_point()

我已经附上了输出图，它没有任何意义。

【问题讨论】：

使用 ``（说明您正在描述变量）而不是 ''（然后您创建一个字符串）。此外，您的变量似乎具有名称 Family.Name 而不是您的代码中的姓氏。试试aes(col = Family.Name)

标签： r ggplot2 data-visualization

【解决方案1】：

你想要这个吗？

要在 x 轴上描绘日期，您需要先将变量转换为 as.Date()

library(tidyverse)
df <- data.frame(
  stringsAsFactors = FALSE,
            Family = c("19A", "19A", "19A", "19A", "19B", "19B", "19B", "19B"),
       Family.Name = c("A Box","A Box","A Box",
                       "A Box","B Box","B Box","B Box","B Box"),
        Product.ID = c("AA980","AA980","AA980",
                       "AA980","AL345","AL345","AL345","AL345"),
             Sales = c("actualsalesunit",
                       "actualsalesunit","actualsalesunit","actualsalesunit",
                       "actualsalesunit","actualsalesunit","actualsalesunit",
                       "actualsalesunit"),
             Times = c("01-01-2021","01-02-2021",
                       "01-03-2021","01-04-2021","01-01-2021","01-02-2021",
                       "01-03-2021","01-04-2021"),
             value = c(63L, 34L, 93L, 99L, 1L, 0L, 0L, 0L)
)

df %>%
  mutate(Times = as.Date(Times, '%d-%m-%Y')) %>%
  ggplot(aes(x= Times, y = value, color = Family.Name, label = value)) +
  geom_line() +
  geom_point() +
  geom_text(size = 3.2, position =position_dodge(0.9), vjust = -0.5)

^{由reprex package (v2.0.0) 于 2021 年 5 月 27 日创建}

【讨论】：