Modérateur : Groupe des modérateurs
Code : Tout sélectionner
> v <- sample(1:5000, size = 1000)
> brk <- hist(v, plot = FALSE)$breaks
>
> brk
[1] 0 500 1000 1500 2000 2500 3000 3500 4000 4500 5000
> brk <- brk[-(7:10)]
> brk
[1] 0 500 1000 1500 2000 2500 5000
>
> hist(v, breaks = brk)
Le résultat n'est pas "joli" mais un histogramme est un estimateur de la densité de probabilité d'une v.a. ==> rien à voir avec un graphe à bâtons...
Le résultat n'est pas "joli" mais un histogramme est un estimateur de la densité de probabilité d'une v.a. ==> rien à voir avec un graphe à bâtons...
Code : Tout sélectionner
v <- sample(1:5000, size = 1000)
fv <- rep(NA,length(v))
fv <- ifelse(v >=0 & v < 500,"c1",fv)
fv <- ifelse(v >=500 & v < 1000,"c2",fv)
fv <- ifelse(v >=1000,"c3",fv)
fv <- as.factor(fv)
sfv <- summary(fv)
barplot(sfv)
merci en effet ca ma bien aidé , par contre les classes ne se mettent pas dans l'ordre ya la classe 32 avant la 2 ...
Code : Tout sélectionner
> sort(c(" 32","2"))
[1] " 32" "2"
> sort(c("32","2"))
[1] "2" "32"
>
Code : Tout sélectionner
v <- sample(1:5000, size = 1000)
fv <- rep(NA,length(v))
fv <- ifelse(v >=0 & v < 500,"c1",fv)
fv <- ifelse(v >=500 & v < 1000,"ac2",fv)
fv <- ifelse(v >=1000," c3",fv)
fv <- as.factor(fv)
sfv <- summary(fv)
par(mfrow=c(1,2))
barplot(sfv)
# pour remettre le vecteur dans l'ordre
vec <- c(3,2,1)
levels(fv)
levels(fv)[vec]
barplot(sfv[vec])
Mais ya toujours quelque chose que je ne comprend pas c'est ou est ce qu'on met la colonne choisie parce que mon résultat ne resemble pas du tout a mon plot donc il y a un problème!!
Code : Tout sélectionner
> vec <- rpois(15,lambda=4)
> vec
[1] 5 1 2 6 4 3 1 1 3 8 2 3 6 8 8
> vec[c(2,4,11)] <- rep(NA,3)
> as.vector(na.omit(vec))
[1] 5 2 4 3 1 1 3 8 3 6 8 8
> vec[!is.na(vec)]
[1] 5 2 4 3 1 1 3 8 3 6 8 8
>
> par(mfrow=c(2,2))
> barplot(vec)
> barplot(vec[!is.na(vec)])
> barplot(as.vector(na.omit(vec)))
>
Retourner vers « Archives : Fonctions graphiques »
Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité