我的df
df <- data.frame(
measurement = runif(120, min=1, max=25),
group = rep(c("A","B","C","D"), each=3, times=10)
)
我将结果放入data.frame
ttest_results <- as.data.frame(pairwise.t.test(df$measurement, df$group)$p.value)
如何格式化适合绘制ggplot矩阵的df?
答案 0 :(得分:1)
以下是使用Hadley Universe重塑数据的一种方法,即dplyr
和tidyr
:
library(dplyr)
library(tidyr)
library(ggplot2)
ttest_results %>%
add_rownames("Group.1") %>%
gather("Group.2", "value", -Group.1) %>%
filter(!is.na(value)) %>%
ggplot(aes(Group.1, Group.2, fill = value)) +
geom_tile(height = .7, width = .7)