r - 在 R 中绘制 3x3 方格

Question

我得到了一个数字列表(n=9)，想把它们画在一个 3*3 的方形网格中，每个网格都用相应的数字填充。如何在 R 中执行此操作而不安装其他软件包，例如情节。非常感谢!

Answer 1

这是一个 ggplot比我预期的要难一些的解决方案:

# Setup the data
m <- matrix(c(8,3,4,1,5,9,6,7,2), nrow=3, ncol=3)
df <- expand.grid(x=1:ncol(m),y=1:nrow(m))
df$val <- m[as.matrix(df[c('y','x')])]

library(ggplot2)
library(scales)
ggplot(df, aes(x=x, y=y, label=val)) + 
  geom_tile(fill='transparent', colour = 'black') + 
  geom_text(size = 14) + 
  scale_y_reverse() +
  theme_classic() + 
  theme(axis.text  = element_blank(),
        panel.grid = element_blank(),
        axis.line  = element_blank(),
        axis.ticks = element_blank(),
        axis.title = element_blank())