r - 如何在 R 中以固定网格模式绘制 "matrix"

我有一个大数据框。前 6 行的示例如下:

> temp
  M1 M2 M3 M4 M5 M6
1  1  1  1  1  1  1
2  1  1  1  1  1  1
3  0  1  0 -1  1  0
4  1  1  1  1  1  1
5  0  0  0 -1  0  1
6  0  0  0  0  0  0
> dput(temp)
structure(list(M1 = c(1, 1, 0, 1, 0, 0), M2 = c(1, 1, 1, 1, 0, 
0), M3 = c(1, 1, 0, 1, 0, 0), M4 = c(1, 1, -1, 1, -1, 0), M5 = c(1, 
1, 1, 1, 0, 0), M6 = c(1, 1, 0, 1, 1, 0)), .Names = c("M1", "M2", 
"M3", "M4", "M5", "M6"), row.names = c(NA, -6L), class = "data.frame")

数据框只有值 -1、0 和 1。总行数为 2,156。我想做的是绘制一个“网格”格式,其中每行由 6 个正方形(每列一个)组成。然后为这三个值中的每一个分配一种颜色(例如,红色、绿色、蓝色)。

我已尝试使用 heatmap.2 执行此操作(但我无法显示不同的方 block )。

我已经尝试使用 ggplot2 和 geom_points() 来做到这一点,但无法找到最好的方法。

任何有关如何有效执行此操作的帮助将不胜感激!

谢谢!

最佳答案

另一种选择:

library(lattice)
temp <- as.matrix(temp)
levelplot(temp, col.regions= colorRampPalette(c("red","green","blue")))

这将产生以下情节:

关于r - 如何在 R 中以固定网格模式绘制 "matrix",我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/32220446/

相关文章:

r - 在 R 中将字符串拆分为固定长度元素的最快方法

git - 在 git 中恢复大多数前 n 个提交

docker - 学习 docker 的先决条件

selenium - 如何 'click' 单选按钮 -> 需要 xPath

css - 选择器属性中的手写笔迭代

c# - 使用 Prism 库将 View 注入(inject) TabControl

c# - 使用 UpdateAsync 方法 ASP.NET Entity Framework

c# - 将浮点指针作为 IntPtr 传递(pinvoke)

shopify - Liquid 中的逗号分隔列表

c# - 如何使用 LinQ 按值分组获取字典中的键列表