Simulation - labeliser les axes

Bonsoir, si j'ai une fonction qui trace une courbe pour un paramètre N, disons la fonction Trace-<-function(N). Puis j'ai une autre fonction qui appelle la fonction Trace 4 fois et qui trace les quatre graphes sur un même graphique comment faire pour labeliser les axes ? Ici N est un vecteur de dimension 4.

Code:

---

1 2 3 4 5 6

NTrace <-function(N) { par(mfrow=c(2,2)) for (i in N) Trace (i) }

---

Où la fonction Trace s'écrit à peu près comme ça :

Code:

---

1 2 3 4 5

Trace <-function(n) { B <-1:n plot(B,type="l") }

---

Merci d'avance pour votre aide.

J'ai trouvé la solution

Code:

---

1 2 3 4 5 6 7 8 9 10

NTrace <-function(N) { par (mfrow=c (2,2)) e<-matrix (N,ncol=2,byrow=T) nom <-matrix (0,ncol=2,nrow=2,byrow =T)#matrice contenant le de vos courbes for(i in 1:2) for (j in 1:2) Trace(e [i,j]) title (main=paste (nom [i,j])) }

---