Comment puis-je changer le titre d'une légende dans ggplot2? [fermé]

J'ai créé un tracé dans ggplot2 pour résumer les données provenant d'un ensemble de données 2 x 4 x 3 cellules. J'ai pu créer des panneaux pour la variable à 2 niveaux en utilisant facet_grid(. ~ Age)et définir les axes x et y avec aes(x=4leveledVariable, y=DV). J'avais l'habitude aes(group=3leveledvariable, lty=3leveledvariable)de produire l'intrigue jusqu'à présent. Cela me donne une visualisation qui est encadrée par la variable à 2 niveaux, l’axe des X représentant la variable à 4 niveaux et des lignes différentes tracées dans les panneaux pour la variable à 3 niveaux. Mais la clé de la variable à 3 niveaux est intitulée avec le nom de la variable à 3 niveaux et je veux que ce soit un titre comportant un espace de caractère. Comment puis-je renommer le titre de la légende?

Ce que j'ai essayé ne semble pas fonctionner (où se abptrouve mon objet ggplot2):

 abp <- abp + opts(legend.title="Town Name")
 abp <- abp + scale_fill_continuous("Town Name")
 abp <- abp + opts(group="Town Name")
 abp <- abp + opts(legend.title="Town Name")

Exemple de données:

ex.data <- data.frame(DV=rnorm(2*4*3), V2=rep(1:2,each=4*3), V4=rep(1:4,each=3), V3=1:3)

Une autre option est d'utiliser

p + labs(aesthetic='custom text')     

Par exemple, l'exemple de Chase ressemblerait à ceci:

library(ggplot2)

ex.data <- data.frame(DV=rnorm(2*4*3),V2=rep(1:2,each=4*3),V4=rep(1:4,each=3),V3=1:3)
p <- qplot(V4, DV, data=ex.data, geom="line", group=V3, linetype=factor(V3)) + facet_grid(. ~ V2)
p + labs(linetype='custom title')

et donner le chiffre:

Vous pouvez changer le titre de la légende en modifiant l'échelle de cette légende. Voici un exemple utilisant le jeu de données CO2

library(ggplot2)

p <- qplot(conc, uptake, data = CO2, colour = Type) + scale_colour_discrete(name = "Fancy Title")
p <- p + facet_grid(. ~ Treatment)
p 

MODIFIER:

En utilisant les exemples de données ci-dessus, voici une solution pratique. Je pense que cela imite l'intrigue que @drknexus essaie de créer. En remarque, si quelqu'un peut expliquer pourquoi nous devons considérer la V3 comme un facteur permettant de l'associer à la légende, je l'apprécierais beaucoup.

p <- qplot(V4, DV, data = ex.data, geom = "line", group = V3, lty = factor(V3)) 
p <- p + scale_linetype_discrete(name = "Fancy Title") + facet_grid(. ~ V2)
p