comment supprimer un partie de courbe
Bonsoir,
Le support de la fonction de densité de loi de Pareto est x>=1, par contre la fonction d'exponentielle x>=0. j'ai utilisé xlim=c(1,5) pour la loi de Pareto mais elle ça marche pas. j'ai utilisé la commande xlim(1,5) à la fin de cette programme mais elle supprime la partie de 0 à 1. Moi je voudrais les trois courbe définie sur (x=c(0,5)) et Pareto elle commence de 1.
Comment faire pour supprimer la partie de 0 à 1 pour la courbe de la loi de Pareto scellement .
Voici le programme
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
|
library("VGAM")
x=seq(0, 5, length.out=1000)
df1<-data.frame(x, y=dpareto(x,shape=1), Legende="Pareto")
df2<-data.frame(x, y=dexp(x, rate=1), Legende="Exponenteille")
df3<-data.frame(x, y=dnorm(x,mean=0,sd=1), Legende="Normale")
df<- rbind(df1,df2,df3)
library(ggplot2)
p1=ggplot(df)+
geom_line(aes(x, y, colour = Legende),lwd=1)+
scale_color_manual(values=c("green","red","blue"),name = '')+
labs(x = "X", y = NULL)
p1 |