Position spéciale d'un text(x,y, "label")

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Tomas leon
Messages : 51
Enregistré le : 09 Jan 2018, 16:12

Position spéciale d'un text(x,y, "label")

Messagepar Tomas leon » 11 Jan 2018, 15:30

Bonjour à tous, j'ai une petite question s'il vous plait,

Je me suis fait une petite fonction pour faire un quantil plot. Pour que ce soit plus visuel, j'ai rajouté une abline :

Code : Tout sélectionner

abline(v = 0.5, h = median(x), col = "red")


Et j'ai affiché dans la ligne la valeur de la médiane avec la fonction text() :

Code : Tout sélectionner

text(0, median(x), median(x))


J'aimerais savoir s'il serait possible de faire comprendre à text() que je veux que ma valeur de médiane soit exactement sûr la ligne de l'abline. Je pourrais faire par exemple :

Code : Tout sélectionner

text(0, 1+median(x), median(x))
--> comme ça il serait au dessus. Mais j'ai des variables dont les abscisses peuvent aller de 1 en 1 ou
0.1 en 0.1 et dans ce cas il serait bien au dessus.

Ou bien si vous avez d'autres solutions je suis preneur,

Voila

Merci !

Mickael Canouil
Messages : 1315
Enregistré le : 04 Avr 2011, 08:53
Contact :

Re: Position spéciale d'un text(x,y, "label")

Messagepar Mickael Canouil » 11 Jan 2018, 15:54

Bonjour,

dans le cas présent votre "abline" trace deux droites: une verticale (argument "v") et une horizontale (argument "h"), or vous ne parlez que d'une droite...
En bref, sans exemple reproductible, ce n'est pas très clair.

Voici un petit exemple basé sur les informations/codes données, en utilisant les arguments "x", "y" et "adj" de la fonction "text":

Code : Tout sélectionner

x <- rnorm(100)
plot(x)
abline(v = length(x)/2, h = median(x), col = "red")
text(x =  length(x)/2, y = median(x), col = "blue", labels = format(median(x), digits = 2), adj = c(0.5, 0))

Ici, "v" et "x" auront toujours la valeur centrale de l'abscisse.

Cordialement,
Mickaël
mickael.canouil.fr | rlille.fr

Tomas leon
Messages : 51
Enregistré le : 09 Jan 2018, 16:12

Re: Position spéciale d'un text(x,y, "label")

Messagepar Tomas leon » 11 Jan 2018, 16:27

Salut Mickael Canouil,

Top merci cela fonctionne. Effectivement j'avais oublié de parler de la droite en question. Mais en gros c'est celle qui bougeait de place, pour que à gauche de celle-ci (d'où le "0" comme première valeur du text() ) et juste au dessus, il y ait la valeur de la médiane. V=0.5 est juste une abline fixe qui correspond à une coupure en 2 de mon graphique.

Donc dans mon cas ça donne ça :

Code : Tout sélectionner

abline(v = 0.5, h = median(x), col = "red")

text(0, median(x), labels = format(median(x), digits = 4), adj = c(0.5,-0.5))


Encore merci !


Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité