Placer une bordure autour de points

J'aimerais placer une bordure noire autour de points sur un nuage de points qui sont remplis fondées sur des données, à l'aide de ggplot2. Aussi, je voudrais éviter d'avoir une entrée de légende pour la bordure noire car il sera sur chaque point. Fondamentalement, je suis à la recherche de ce complot, mais avec une bordure noire autour de chaque point. 

df <- data.frame(id=runif(12), x=1:12, y=runif(12))
ggplot(df, aes(x=x, y=y))+geom_point(aes(colour=id), size=12)

Placer une bordure autour de points

Comme un bonus, j'aimerais pas avoir une entrée de légende pour la bordure noire. Mon meilleur essai est:

df <- data.frame(id=runif(12), x=1:12, y=runif(12))
ggplot(df, aes(x=x, y=y))+geom_point(aes(fill=id, colour="black"), size=12)

Qui donne:

Placer une bordure autour de points

Je ne comprends pas pourquoi ça ne veut pas me donner ce que je veux, et pour le pire (pour mes études au ggplot2) je ne comprends pas pourquoi il ne semble pas que la carte de la couleur de remplissage à rien! Toute aide?

Peut-être que si je peux obtenir le contour et remplissage de la cartographie droit je peux utiliser un hack comme celui de la dernière série de chiffres ici pour désactiver la légende.

InformationsquelleAutor Drew Steen | 2012-05-03
  1. 84

    C'est un peu obscur, mais vous devez utiliser les pch>20 (je pense à 21:25 sont les formes pertinentes): fill contrôles à l'intérieur de colo(u)de l'anneau et de colour contrôles de la ligne autour du bord.

    (g0 <- ggplot(df, aes(x=x, y=y))+geom_point(aes(fill=id), 
       colour="black",pch=21, size=5))

    mise à jour: avec les récentes ggplot2 versions (par exemple, la version 2.0.0, ne sais pas combien de temps il va) la valeur par défaut guide est un colourbar. Besoin g0 + guides(fill="legend") pour obtenir une légende avec des points comme dans la parcelle montré ici. La valeur par défaut pauses ont changé, aussi: à exactement reproduire ce terrain vous avez besoin g0 + scale_fill_continuous(guide="legend",breaks=seq(0.2,0.8,by=0.1)) ...

    Placer une bordure autour de points

    Liés, mais pas identiques: comment créer une intrigue avec des points dans R? . La accepté de répondre à cette question, qui utilise la technique de stratification montré dans @joran réponse, mais (OMI), la réponse par @jbaums, qui utilise le pch=21 technique, est supérieure. (Je pense que shape=21 est une alternative, et peut-être même préféré, à pch=21.)

    PS vous devriez mettre colour à l'extérieur la cartographie (aes bits) si vous voulez en faire absolument, et non selon la valeur d'une variable ...

    • Merci Ben. Est-il possible de modifier le contour de la largeur à l'aide de cette méthode?
    • Je n'en vois pas (j'ai essayé de réglage width et lwd), désolé.
    • Quelque chose doit ont changé parce que cela ne fonctionne plus. Une couleur continue de légende sans points indique à présent. Peut-être le remplissage doit être factor(id)?
    • Merci, désolé pour la confusion.
    InformationsquelleAutor Ben Bolker
  2. 27

    La première question est un gimme:

    ggplot(df, aes(x=x, y=y)) + 
    geom_point(aes(colour=id), size=12) + 
    geom_point(shape = 1,size = 12,colour = "black")

    Et, oh, vous ne pas voulez un supplément de légende. Je pense que c'est-il alors:

    Placer une bordure autour de points

    • Il est intéressant de noter qu'un guide ne se présentent pas au second geom_point - je ne comprends pas vraiment pourquoi, mais depuis c'est ce que je voulais de toute façon je vais vous inquiéter à ce sujet un autre jour
    • Oh, je vois pourquoi - parce qu'il n'est pas à l'intérieur d'un aes() appel
    • regarde comme vous l'avez compris, j'ai posé une question similaire, un temps, car il m'a fallu un certain temps pour comprendre que trop. Je ne suis pas sûr si/ce qui serait faite de la date de l'introduction de ggplot 0.9: stackoverflow.com/questions/4221168/...
    • C'est bien, mais ne fonctionne pas si vous utilisez de la gigue.
    • Vous êtes de droite. Est-il une solution? J'aimerais faire faire quelque chose de similaire à l'aide de geom_jitter.
    • bien sûr, "jitter" les points manuellement (transformer les valeurs en df) à l'aide de rnorm ou jitter. Vous pouvez stocker ces valeurs dans une nouvelle variable dans le cas où vous avez besoin de valeurs brutes en aval.

    InformationsquelleAutor joran
  3. 5

    J'ai eu le même problème, mais j'ai besoin d'une solution qui permet de gigue, trop. Pour cela, vous devez utiliser un pch, qui est une forme remplie avec une bordure et une grille.fonction d'édition de gridExtra paquet. À l'aide de votre exemple:

    df <- data.frame(id=runif(12), x=1:12, y=runif(12))
ggplot(df, aes(x=x, y=y, fill=id))+geom_point(pch=21, colour="Black", size=12)

library(gridExtra)
grid.edit("geom_point.points", grep = TRUE, gp = gpar(lwd = 3))
    InformationsquelleAutor alexo4