r - r中具有不同数据框格式的折线图
问题描述
对于每个部门,我想使用 ggplot 在 r 中以折线图的形式查看他们在过去三周内花费了多少。x 轴是周,y 轴是数量
df <- data.frame(department = c(111,111,111,222,222,222,333,333,333),
week = c("w1","w2","w3","w1","w2","w3","w1","w2","w3"),
Amount =c(34,46,34,40,45,56,67,69,75))
department week Amount
111 w1 34
111 w2 46
111 w3 34
222 w1 40
222 w2 45
222 w3 56
333 w1 67
333 w2 69
333 w3 75
我无法将设置每个唯一部门值的数据转换为列名及其相应的行数。然后我猜可以使用 ggplot 来完成。
但是他们有什么方法可以用这种格式的数据做图吗?
解决方案
这符合您的需求吗?
library(tidyverse)
df <- data.frame(department = c(111,111,111,222,222,222,333,333,333),
week = c("w1","w2","w3","w1","w2","w3","w1","w2","w3"),
Amount =c(34,46,34,40,45,56,67,69,75))
df %>%
mutate(department = as.factor(department)) %>%
ggplot(aes(x = week, y = Amount, group = department, col = department)) +
geom_line() +
labs(x = "Week", y = "Amount spent", col = "Department")
由reprex 包(v1.0.0)于 2021-04-22 创建
推荐阅读
- javascript - React 中用于访问令牌和刷新令牌的 Axios 拦截器
- powershell - 我的 Azure 自动化 Runbook 使用存储的凭据来获取新组的列表,需要不使用存储凭据的替代方案
- git - 在 Intellij / Android Studio 中,如何更改 diff gutter 列的分支差异?
- java - 使用测试容器模拟数据库的网络中断
- tensorflow - Sketch_RNN,ValueError:无法输入形状的值
- prolog - 理解 Prolog 中的否定
- python - 递归自连接和转置
- python - 从 PDB 文件中查找氨基酸索引和序列之间的映射
- r - 数据表中的累积和,但对每一行使用分组
- azure - 增加 ARM CustomScriptExtension 日志大小