Заполненный матричный сюжет со сложенным барплотом ggplot?

Question

Я хочу, чтобы барплот был сложен внутри матрицы.Должен ли я пойти с ggplot?

Мои данные выглядят так:

И я хочу, чтобы в каждой матрице был столбец.Не так

Мои данные выглядят так:

ggplot(data = data1,
       aes(x = Var1, y = Var2, fill = value)) + 
  geom_tile()

Столбчатая диаграмма для каждой матрицы здесь

Результат примерно такойthis: каждая переменная будет использоваться как матрица внутри матрицы Результат

Answer 1

Вот мое решение.Я полагаю, это то, что вы ищете.

library(ggplot2)

# data
x <- data.frame(Var1=rep(c(rep("A",3), rep("B",2), "C"),3),
            Var2=rep(c("A","B","C","B","C","C"),3),
            variable=rep(c("part1","part2","part3"), each=6),
            value=c(40.6,34.7,42.6,32.2,43.7,45.1,38.8,30.8,41.7,
                    29.4,40.4,42.2,20.6,34.5,15.7,38.4,15.9,12.7))

# plot
ggplot(x, aes(x=1,y=value, fill=variable))+
  geom_bar(stat="identity", width=1, position="stack")+
  facet_grid(Var1~Var2)+

# remove unwanted information
  theme_classic()+
  theme(axis.title=element_blank(), 
        axis.line=element_blank(),
        axis.ticks=element_blank(), 
        axis.text=element_blank(),
        plot.background = element_blank(), 
        plot.title=element_blank(),
        strip.background = element_blank())

Answer 2

Исходя из вашего вопроса, немного сложно понять, что именно вы пытаетесь сделать, но вот простой скрипт, который может помочь вам начать работу.Я догадался, что вы хотите разделить матрицу по переменной?Если нет, отрегулируйте соответственно.

p<-ggplot(data = data, aes(x=Var1, y=Var2, fill=value)) + geom_bar()
p + facet_grid(. ~ variable)