如何在热图中围绕“组”绘制框?

暗话者

我做了这样的图:

library(reshape2)
library(ggplot2)

m <- matrix(1:64 - 32, 8)
rownames(m) <- colnames(m) <-
  c(paste0("a", 1:3), paste0("b", 1:2), paste0("c", 1:3))
d <- melt(m)
gg <- ggplot(d) +
  geom_tile(aes(x = Var1, y = Var2, fill = value)) +
  scale_fill_gradient2()

如何以编程方式在“ a”,“ b”和“ c”组周围绘制框?

矩阵m将始终为正方形。colnames(m)并且rownames(m)将永远相同。因此,这些框将覆盖整个网格,并且永远不会重叠。通常,小组人数会有所不同。

我也没有结婚ggplot2我对基本图形的解决方案持开放image态度只要它不比ggplot2/grid版本复杂

我到了

d$group <- substr(d$Var1, 1, 1)

在我意识到我不知道如何进行之前。


我有的:

在此处输入图片说明

我想要的是:

在此处输入图片说明

布罗迪

这可能被认为是作弊,但非常简单:

# Depending on your data you may be able to generate `d2` directly
# here we need to re-order a bit

d2 <- transform(
   d, V1 = substr(Var1, 1, 1), 
   V2=factor(substr(Var2, 1, 1), levels=letters[3:1])
)
ggplot(d2) +
  geom_tile(aes(x = Var1, y = Var2, fill = value)) +
  scale_fill_gradient2() +
  facet_grid(V2 ~ V1, scales="free", space="free")

在此处输入图片说明

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

如何在树状图中围绕分组的簇绘制彩色矩形?

来自分类Dev

热图中的标签组

来自分类Dev

热图中的标签组

来自分类Dev

如何在ggplot2热图中将边界框添加到特定区域?

来自分类Dev

如何在ggplot热图中获取标签?

来自分类Dev

如何在热图中获取数据?

来自分类Dev

如何在日历热图中添加图例

来自分类Dev

如何围绕同级HTML元素绘制一个框?

来自分类Dev

禁用围绕单词绘制的框

来自分类Dev

如何在箱图中为每个组绘制其他统计信息?

来自分类Dev

如何在一幅图中绘制不同的数据框数据?

来自分类Dev

如何在matplotlib中绘制两组数据框列的箱线图

来自分类Dev

gnuplot:如何在热图图中写入z值

来自分类Dev

如何在热图中取消加粗颜色栏标签

来自分类Dev

gnuplot:如何在热图图中写入z值

来自分类Dev

如何在散景热图中获取点击位置的标签

来自分类Dev

如何在 Seaborn 热图中设置列和行?

来自分类Dev

如何在软体投影上绘制坐标的热图

来自分类Dev

如何在绘图上绘制带注释的热图?

来自分类Dev

如何在python中绘制函数作为热图?

来自分类Dev

如何在距离矩阵的热图上绘制树状图

来自分类Dev

如何在R的能量图中绘制曲线?

来自分类Dev

如何在图中绘制隐式方程?

来自分类Dev

如何在 semilogx 图中绘制 x=0?

来自分类Dev

如何自动围绕一组形状绘制边界线?[Visio]

来自分类Dev

如何对同一图中的组进行分组和绘制?

来自分类Dev

如何在R中绘制“组”数据?

来自分类常见问题

绘图:如何在一个绘图图中从同一熊猫数据框的不同列绘制多条线?

来自分类Dev

绘图:如何在一个绘图图中从同一熊猫数据框的不同列绘制多条线?

Related 相关文章

热门标签

归档