在R中绘制图表时的问题（Dodge或Geom_line）

发布于 2025-01-26 15:39:51 字数 215 浏览 2 评论 0 原文

我想在每组（t）的图中表达每列（a，b，c，d，e）的频率。我不知道该怎么办。如图所示，数据是以数据框架的形式选择的，但是我不知道在下图中表达该数据。我尝试仅提取使用GGPLOT的值，但即使这也没有解决。有一个好方法吗？有没有办法用钢筋图以外的线表达它？帮我。 “在此处输入图像说明”

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

笨死的猪 2025-02-02 15:39:51

您可以使用以下代码：

df <- data.frame(t = c("m", "i", "j", "z"),
                 a = c(300, 20, 15, 500),
                 b = c(100, 44, 99, 320),
                 c = c(200, 57, 98, 17),
                 d = c(150, 52, 122, 666),
                 e = c(50, 89, 64, 68))

library(tidyverse)
library(reshape)
df %>%
  melt(id.vars = "t") %>%
  ggplot(aes(x = t, y = value, fill = variable)) +
  geom_col(position = "dodge")

输出：

You can use the following code:

df <- data.frame(t = c("m", "i", "j", "z"),
                 a = c(300, 20, 15, 500),
                 b = c(100, 44, 99, 320),
                 c = c(200, 57, 98, 17),
                 d = c(150, 52, 122, 666),
                 e = c(50, 89, 64, 68))

library(tidyverse)
library(reshape)
df %>%
  melt(id.vars = "t") %>%
  ggplot(aes(x = t, y = value, fill = variable)) +
  geom_col(position = "dodge")

Output:

回复收藏 0 原文

掐死时间 2025-02-02 15:39:51

将数据旋转更长以合并列A到e的所有计数，仅在一个名称和值列内，可以用作GGPLOT的维度美学：

library(tidyverse)

data <- tribble(
  ~t, ~a, ~b,
  "m", 300, 100,
  "i", 20, 44,
  "j", 15, 99
)

data %>%
  pivot_longer(-t) %>%
  ggplot(aes(t, value, fill = name)) +
  geom_col(position = "dodge")

^由

Pivot the data longer to merge all counts of columns a to e inside just one name and value column, which can be used as dimension aesthetics for ggplot:

library(tidyverse)

data <- tribble(
  ~t, ~a, ~b,
  "m", 300, 100,
  "i", 20, 44,
  "j", 15, 99
)

data %>%
  pivot_longer(-t) %>%
  ggplot(aes(t, value, fill = name)) +
  geom_col(position = "dodge")