在 R 中复制带有一些注释的 Excel 图形？

Question

我最近在 Excel 中进行描述性分析。但作为一名 R 学习者，我想通过使用 R 自己的编码、包等在 R 中重现（大约）Excel 图形。这是一个数据示例：

和Excel图是

作为学习 R 的初学者，我的问题很简单：“如何使用基础绘图、点阵或 ggplot2 在 R 中生成这个 excel 图形？” 任何帮助将不胜感激！！！

Answer 1

您的问题是一个多部分问题，具体取决于情节的哪些元素很重要。这是使用 ggplot2 重现此图的方法。

首先，我创建了一个可重现的数据集：

df <- data.frame(
Group1 = factor(rep(c("A", "Fially", "AC"), each = 3),  
    levels = c("A", "Fially", "AC")),
Group2 = factor(c("B", "GGF", "Kp"), 
    levels = c(c("B", "GGF", "Kp"))),
Value = c(100, 5, 6, 200, 42, 21, 300, 80, 15)
)

请注意，您需要重新排序您的因子（如果需要，请参阅 Reorder levels of a factor without changing order of values 以获得更多帮助）。

其次，我使用条形图使用 ggplot2 绘制数据（参见文档 here）。

library(ggplot2)
ggOut <- ggplot(data = df, aes(x = Group1, 
                y = Value, fill = Group2)) +
         geom_bar(stat="identity", position="dodge") +
         theme_bw() + 
         ylab("") +
         xlab("") + 
         scale_fill_manual(name = "", 
                           values = c("red", "blue", "black")) 

print(ggOut)
ggsave(ggOut)

这段代码给你这个数字：

改图例，我按照this guide.

在 R 中复制带有一些注释的 Excel 图形？

Reproducing Excel Graphics with some annotations in R?

r

data-analysis

ggplot2

lattice

rgraph