Modérateur : Groupe des modérateurs
Code : Tout sélectionner
fac <- as.factor(c(rep("a",5),rep("b",5)))
ted <- rnorm(10)
# il ne faut pas oublier d'indiquer "axes=F" dans le boxplot
# voir "?boxplot" et "?plot.default"
boxplot(ted~fac,axes=F)
vec <- seq(-2,2,le=10)
axis(2,vec,labels=round(vec,2))
axis(1)
Code : Tout sélectionner
fac <- as.factor(c(rep("a",5),rep("b",5)))
ted <- rnorm(10)
boxplot(ted~fac,axes=F)
vec <- seq(-2,2,le=10)
vec1 <-round(vec,1)
vec2 <- sapply(1:10,function(x) ifelse(((x)%%2) ==0,"",vec1[x]))
axis(2,vec,labels=vec2)
axis(1)
Code : Tout sélectionner
# données bidon
Data <- data.frame(Direction = c(pmax(0, pmin(360, rnorm(200, 75, 10))),
pmax(0, pmin(360, rnorm(200, 45, 10)))),
Station = rep(c("Montoir", "Donges"), each = 200))
# position des tick marks
pos <- seq(0, 360, 10)
library(lattice)
bwplot(Station ~ Direction, data = Data,
scales = list(x = list(at = pos)))
boxplot(Direction ~ Station, data = Data, axes = FALSE)
axis(1, at = 1:2, labels = levels(Data$Station))
axis(2, at = pos, labels = format(pos), las = 1)
box()
Code : Tout sélectionner
axis(4, at = pos, labels = format(pos), las = 1)
Merci pour le second axe mais il n'apparaît qu'en partie à droite du champ graphique, n'y a-t'il pas moyen de fixer la largeur de la fenêtre graphique afin de faire apparaître comme il faut ces étiquettes de direction ?
Retourner vers « Archives : Fonctions graphiques »
Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité