Discussion :

[Geofv]

Bonjour,

Je cherche à faire un truc qui parait simple mais je ne trouve pas la commande pour cela...

A partir de mes données, j'arrive à cela :


Je souhaiterais pouvoir donner des couleurs plus marquées entres elles que celles que j'ai ici et ajouter pour chaque rectangle, le numéro correspondant (1à10). L'idéal serait également que la couleur de mon rectangle corresponde à la couleur attribuée dans la légende...
Voici mon code :

Code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
ggplot() +
  geom_segment(data=segment(dendr), aes(x=x, y=y, xend=xend, yend=yend)) +
  geom_text(data=label(dendr), aes(x, y, label=label, hjust=0, color=cluster),
            size=3) +
  geom_rect(data=rect, aes(xmin=X1-.3, xmax=X2+.3, ymin=0, ymax=ymax),
        color=rect$rect.cluster, fill=NA)+
  geom_hline(yintercept=0.33, color="red")+
  theme_dendro()

Donc si vous avez des solutions pour cela et également pour améliorer l’esthétique, je suis preneur.

Merci