Modifier l'espacement des marques de tic-tac sur l'axe d'un graphique ?

Question

Comment puis-je modifier l'espacement des marques de contrôle sur l'axe d'un graphique ?

Quels paramètres dois-je utiliser avec la base plot ou avec rgl ?

Answer 1

Il existe au moins deux façons d'y parvenir en graphique de base (mes exemples concernent l'axe des x, mais fonctionnent de la même manière pour l'axe des y) :

1. Utilisez par(xaxp = c(x1, x2, n)) ou plot(..., xaxp = c(x1, x2, n)) pour définir la position ( x1 & x2 ) des repères extrêmes et le nombre d'intervalles entre les repères ( n ). En conséquence, n+1 est le nombre de points de repère dessinés. (Ceci ne fonctionne que si vous n'utilisez pas d'échelle logarithmique, pour le comportement avec des échelles logarithmiques voir ?par .)

2. Vous pouvez supprimer complètement le dessin de l'axe et ajouter les marques de tique plus tard avec axis() .
   Pour supprimer le dessin de l'axe, utilisez plot(... , xaxt = "n") .
   Ensuite, appelez axis() avec side , at et labels : axis(side = 1, at = v1, labels = v2) . Avec side se référant au côté de l'axe (1 = axe des x, 2 = axe des y), v1 étant un vecteur contenant la position des ticks (par exemple, c(1, 3, 5) si votre axe va de 0 à 6 et que vous voulez trois notes), et v2 un vecteur contenant les étiquettes pour les marques de tic-tac spécifiées (doit être de la même longueur que v1 par exemple, c("group a", "group b", "group c") ). Voir ?axis et ma réponse mise à jour à un message sur stats.stackexchange pour un exemple de cette méthode .

Answer 2

Avec les graphiques de base, le plus simple est d'empêcher les fonctions de traçage de dessiner des axes, puis de les dessiner vous-même.

plot(1:10, 1:10, axes = FALSE)
axis(side = 1, at = c(1,5,10))
axis(side = 2, at = c(1,3,7,10))
box()

Answer 3

J'ai un ensemble de données dont l'axe des x est le temps et l'axe des y l'intensité. Je dois d'abord supprimer tous les axes par défaut, sauf les étiquettes des axes avec :

plot(Time,Intensity,axes=F)

Puis je reconstruis les éléments de l'intrigue avec :

box() # create a wrap around the points plotted
axis(labels=NA,side=1,tck=-0.015,at=c(seq(from=0,to=1000,by=100))) # labels = NA prevents the creation of the numbers and tick marks, tck is how long the tick mark is.
axis(labels=NA,side=2,tck=-0.015)
axis(lwd=0,side=1,line=-0.4,at=c(seq(from=0,to=1000,by=100))) # lwd option sets the tick mark to 0 length because tck already takes care of the mark
axis(lwd=0,line=-0.4,side=2,las=1) # las changes the direction of the number labels to horizontal instead of vertical.

Donc, at = c(...) spécifie la collection de positions pour placer les marques de tic-tac. Ici, je voudrais mettre les marques à 0, 100, 200,..., 1000. seq(from =...,to =...,by =...) me donne le choix des limites et des incréments.

Answer 4

Et si vous ne voulez pas que R ajoute des décimales ou des zéros, vous pouvez l'empêcher de dessiner l'axe des x ou l'axe des y ou les deux en utilisant ...axt. Ensuite, vous pouvez ajouter vos propres tics et étiquettes :

plot(x, y, xaxt="n")
plot(x, y, yaxt="n")
axis(1 or 2, at=c(1, 5, 10), labels=c("First", "Second", "Third"))

Answer 5

Je viens de découvrir le Hmisc paquet :

Contient de nombreuses fonctions utiles à l'analyse des données, des graphiques de haut niveau, des opérations utilitaires, des fonctions permettant de calculer la taille et la puissance des échantillons, d'importer et d'annoter des ensembles de données, d'imputer les valeurs manquantes, de créer des tableaux avancés, de regrouper des variables, de manipuler des chaînes de caractères, de convertir des objets R en code LaTeX et html, et de recoder des variables.

library(Hmisc)    
plot(...)
minor.tick(nx=10, ny=10) # make minor tick marks (without labels) every 10th