1. Grâce à ce formulaire vous pouvez proposer une astuce ou un script sur R.
  2. Votre script doit pouvoir être lancé en l'état. Veuillez penser à :
    • inclure le chargement des "library" nécessaires
    • construire un petit jeu de données si besoin est.
    • commenter les lignes de codes pour en faciliter la compréhension.
  3. Le titre de votre script ou astuce doit être clair et explicite.
  4. Pensez à mettre votre code entre les balises [R] et [/R]; Pour cela, vous pouvez utiliser le bouton

Vous pouvez utiliser vos comptes Facebook, twitter ou google pour vous identifer (google est compatible yahoo, openID...)
L'ideal étant de vous connecter si vous avez un compte utilisateur, ou faire une demande de compte utilisateur si vous n'en avez pas encore.
Créer un compte va vous permettre de pouvoir éditer vos codes et de mettre en avant votre site internet.
Sinon vous pouvez soumettre anonymement en remplissant les champs ci-après.







Choisissez les catégories correspondantes à votre Code:

  • algorithmique
  • Analyse de survie
  • base indispensable
  • bayésien
  • configuration de R
  • exportation de données
  • fonctions utiles
  • graphique
  • importation de données
  • inférence
  • manipulation de données
  • message d'erreur
  • modélisation
  • Non classé
  • optimisation
  • planification
  • programmer avec R
  • regression linéaire
  • Test
  • Transformation de données


Comment ajouter du texte sur un graphique? text

1
dans graphique
R vous permet d’ajouter du texte à vos graphique en utilisant la fonction text. Il vous suffit de fournir les coordonnées du point où le texte doit être affiché. Si vous n’en avez aucune idée n’hésitez pas à utiliser la fonction locator() pour vous repérer.
Un exemple:

 
 
 host<-function(t){5/(1+1000*exp(-1.18*t^0.4))}
time<-c(0:200)
 
 
par(mar=c(4, 6, 2, 1),cex.lab=1.3,cex.axis=1.2)
plot(host(time)~time,type='l',lwd=4.5,col="grey",ylab="Plant radius (cm)",
    xlab="",ylim=c(0,5))
abline(h=1.1,col='gray10',lty=3)
abline(v=50,col='gray10',lty=3)
abline(h=3.15,col='grey',lty=3)
abline(v=100,col='grey',lty=3)
arrows(100,1.1,100,3.15,col='red',lwd=4,code=3)
arrows(50,1.1,100,1.1,col='black',lwd=4,code=3)
 
# on ajoute du texte en face des flèches en choisissant la couleur et la taille avec col et cex
 
text(150,2.2," croissance radiale",col='red',cex=1.5)
text(75,0.5,"dt",cex=1.5)
 
 


Proposé par Melen Leclerc.

Ce script vous à rendu service? remerciez l'auteur en votant ici:
- ça ne sert à rien -- c\'est interessant - (score de +3 sur 3 votes)
Loading ... Loading ...

Un commentaire

  1. Manugarin
    Posté le 21 mai 2013 a 13 h 03 min | Permalink

    Bonjour,
    Je fais mon graphique et tout va bien.

     
    bp<- barplot(P_De_ruchers,col="green",names.arg=c("1 to 5","6 to 10","11 to 20","21 to 50","51 to 100","101 to 150"," > 150"),
     main="Proportion of apiaries according to their size in the German sample",<strong>sub</strong>="Date",ylab="Pourcentage of apiaries", xlab="Number of colonies per apiary",ylim=c(0,100)) 
    text((bp,P_De_ruchers+3,a)
    a=paste(P_De_ruchers,"%",sep="")

    Cependant j’aimerai que le texte de sub soit en dessous du texte de main. 
    J’ai essayé de mettre sub dans mon text() mais cela ne marche pas

    Comment peut on faire?

    Merci

Poster un commentaire


Votre email ne seras jamais communiqué champs requis désigné par une *

*
*


six − 5 =

Formation logiciel R