Existe-t-il un moyen de créer des nuages de points avec des histogrammes marginaux, comme dans l'exemple ci-dessous ggplot2
? Dans Matlab, c'est la scatterhist()
fonction et il existe également des équivalents pour R. Cependant, je ne l'ai pas vu pour ggplot2.
J'ai commencé une tentative en créant les graphiques uniques mais je ne sais pas comment les organiser correctement.
require(ggplot2)
x<-rnorm(300)
y<-rt(300,df=2)
xy<-data.frame(x,y)
xhist <- qplot(x, geom="histogram") + scale_x_continuous(limits=c(min(x),max(x))) + opts(axis.text.x = theme_blank(), axis.title.x=theme_blank(), axis.ticks = theme_blank(), aspect.ratio = 5/16, axis.text.y = theme_blank(), axis.title.y=theme_blank(), background.colour="white")
yhist <- qplot(y, geom="histogram") + coord_flip() + opts(background.fill = "white", background.color ="black")
yhist <- yhist + scale_x_continuous(limits=c(min(x),max(x))) + opts(axis.text.x = theme_blank(), axis.title.x=theme_blank(), axis.ticks = theme_blank(), aspect.ratio = 16/5, axis.text.y = theme_blank(), axis.title.y=theme_blank() )
scatter <- qplot(x,y, data=xy) + scale_x_continuous(limits=c(min(x),max(x))) + scale_y_continuous(limits=c(min(y),max(y)))
none <- qplot(x,y, data=xy) + geom_blank()
et les organiser avec la fonction affichée ici . Mais pour faire court: existe-t-il un moyen de créer ces graphiques?