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