Tengo un marco de datos que contiene los siguientes datos:

> data_graph
# A tibble: 12 x 4
# Groups:   ATTPRO, ATTMAR [?]
       x     y group    nb
   <dbl> <dbl> <chr> <int>
 1     0     0     1  1060
 2     0     0     2   361
 3     0     0     3   267
 4     0     1     1   788
 5     0     1     2   215
 6     0     1     3    80
 7     1     0     1   485
 8     1     0     2   168
 9     1     0     3   101
10     1     1     1  6306
11     1     1     2  1501
12     1     1     3   379

Mi objetivo es tener el siguiente cuadro:

Ambosx yy, variables cualitativas, que se pondrán como eje X / Ynótese bien, variable cuantitativa, que representa el tamaño del pastelgrupo, variable cualitativa, que representa partes del pastel

El mejor resultado al abordar esto usandoggplot2 El paquete solo me está dando burbujas, con este código. No puedo encontrar una solución para poner pasteles dentro:

library(ggplot2)
  ggplot(data_graph, aes(y = factor(y),x = factor(x))) +
  geom_point(aes(colour = group, size = nb)) +
  theme_bw() + 
  cale_size(range = c(1, 20)) +
  labs(x = "x", y = "y", color = "group", size = "nb")

Utilizandoscatterpie El paquete no ayudó mucho. Esta vez los pasteles están bien dibujados, pero no puedo encontrar una manera de usarnótese bien para definir el tamaño del pastel. También,x yy son tratados como variables cuantitativas (lo intentéfactor() sin ninguna posibilidad) en lugar de las cualitativas. El resultado es bastante feo, sin una leyenda completa.

> tmp
  x y    A    B   C
1 0 0 1060  361 267
2 0 1  788  215  80
3 1 0  485  168 101
4 1 1 6306 1501 379

library(scatterpie)
ggplot() +
   geom_scatterpie(aes(x = x, y = y), data = tmp, cols = c("A", "B", "C")) +
   coord_fixed()

¿Cómo se puede alterar este código para tener el primer gráfico con los pasteles del segundo?