o ylab que vc quer (assumindo q vc queira algo multiplataforma, obvio) eh: expression(Temperatura~group("(", degree*C, ")")) b 2011/6/1 Ivan Bezerra Allaman <ivanalaman@yahoo.com.br>:

Enquanto o Walmes não responde, vai quebrando o galho com essa solução abaixo. lines <- 'meses  temp umidade    rad   chuva      Jan     26.49   86.58    795.88  0.36      Fev     26.65   88.49    710.24  0.34      Mar    27.19   86.16     772.99  0.21      Abr    26.28   89.75     574.88  0.67      Mai    26.62   89.22    614.02  0.31      Jun   26.13   87.83    680.08  0.26      Jul    25.83   86.57     675.97  0.15      Ago   27.05   83.14    756.44  0.07      Set    27.60   83.02    925.57  0.14     Out   27.44   85.16    927.71  0.17     Nov   26.56   88.18   788.87  0.19    Dez  25.87   90.63    703.94  0.33' da <- read.table(textConnection(lines), header=TRUE) par(mar=c(5,4,4,5)) plot(da$temp, type="b", pch=15, lwd=1.5,      xlab="Meses (Anos 2010)",      ylab="Temperatura (ºC)",      ylim=c(24,30), xlim=c(1,12),      axes=F,      main= "A", font.main=2, font.lab=2) axis(1, at=1:12,labels=c("Jan.","Fev.","Mar.","Abr.","Maio","Jun.", "Jul.", "Ago.", "Set.", "Out.", "Nov.", "Dez.")) axis(2)      par(new=T)      plot(da$umidade, type="b", pch=14,axes=F, frame=T, ann=F)      axis(4)      mtext(text="Umidade (%)", 4, line = 3) Allaman (S,f,P)

M.Sc Ivan Bezerra Allaman Zootecnista Doutorando em Produção Animal/Aquicultura - UFLA email e msn - ivanalaman@yahoo.com.br Tel: (35)3826-6608/9900-2924 _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br

-- Successful people ask better questions, and as a result, they get better answers. (Tony Robbins)