Parcela circular de barras apiladas en R
Encontré este paquete increíble y relativamente sencillovisto aquí que puede crear hermosos gráficos de barras apiladas normalizadas en forma polaral igual que. Espero crear un diagrama similar, pero eso no está normalizado y puede tener valores brutos como entrada.
En su blog, indica que alguien hizo una versión no normalizada de su código que puede producir tramas como esta:
Esto es casi exactamente lo que necesito, pero no puedo entender cómo apilar las barras para producir un gráfico así (perdón por la calidad):
Aquí hay algunos datos de juguetes que son un subconjunto de los datos reales que usaré y que siguen su formato de entrada:
family item score value
Group 1 Disease 1 Genetics 1
Group 1 Disease 1 EMR 8
Group 1 Disease 1 Pubmed 10
Group 1 Disease 2 Genetics 1
Group 1 Disease 2 EMR 21
Group 1 Disease 2 Pubmed 4
Group 1 Disease 3 Genetics 0
Group 1 Disease 3 EMR 2
Group 1 Disease 3 Pubmed 0
Group 2 Disease 4 Genetics 4
Group 2 Disease 4 EMR 72
Group 2 Disease 4 Pubmed 16
Group 3 Disease 5 Genetics 2
Group 3 Disease 5 EMR 19
Group 3 Disease 5 Pubmed 7
Group 3 Disease 6 Genetics 2
Group 3 Disease 6 EMR 12
Group 3 Disease 6 Pubmed 6
Group 4 Disease 7 Genetics 0
Group 4 Disease 7 EMR 11
Group 4 Disease 7 Pubmed 4
Se puede encontrar un enlace directo al código del paquete que proporciona abiertamenteaquí.
Muchas gracias, Ben.
editar: Esto es lo que he intentado
Entré en el código y reemplacé:
# histograms
p<-ggplot(df)+geom_rect(
aes(
xmin=xmin,
xmax=xmax,
ymin=ymin,
ymax=ymax,
fill=score)
)
con:
# histograms
p<-ggplot(df)+
geom_bar(stat="identity", position="stack", aes(x=item, y=value,fill=score))
Hice esto porque, por lo que he podido entender, no hay una manera fácil de generar una barra apilada usando geom_rect y cuando intento el código anterior fuera del contexto del script polarBarChart, trazará gráficos de barras apiladas, pero a partir de el centro genera en lugar de salir de la entrada. Además, cuando uso este código dentro del script polarBarChart me sale el siguiente error:
“Error: Discrete value supplied to continuous scale”
y sin salida