[R-es] leyenda cortada en el eje Y (Solucionado)

[Felix.Villanueva]

Gracias a ambos, al final con aumentar un poquito el margen como
sugiere Olivier, queda perfecto, Gracias!

El Wed, 18 May 2011 12:04:26 +0200
"Felix.Villanueva" <felix.villanueva en uclm.es> escribió:
> Hola:
> Soy nuevo en esto de R, llevo toda la mañana perdida con esto, a ver
> si alguien me puede ayudar, Cuando genero el gráfico con el siguiente
> archivo:
> 
> library(gplots)
> data <- read.table("data.dat",h=T)
> postscript(file = "join10kb.ps", horizontal = FALSE, onefile =
> FALSE,family = "Helvetica", width = 5, height = 4) par(mar=c(5.1, 4.1,
> 0.1, 0.1)) 
> d <- matrix(c(data$Per.Hop,data$Global,data$Sink),nrow=3)
> 
> barplot2(d,beside=T,xlab="Distance between nodes (in
> meters)",ylab="Number of queries
> injected",legend.text=c("Per-Hop","Global","Sink"),col=c("black","grey","white"))
> 
> axis(1,at=c(2.5,6.5,10.5),data$Xstep, tick=F)
> dev.off()
> 
> Las barras verticales llegan hasta un valor aproximado de 400.000, sin
> embargo, la leyenda en el eje Y sólo llega hasta 350.000. He probado a
> poner con ylim(0,400000) y con esto, consigo lo que quiero pero el
> gráfico me corta la leyenda, es decir, en vez de aparecer 4e+05, sale
> 4e+
> 
> Alguna sugerencia?? muchas gracias.
> 
> PD:
> El data.dat es tan sencillo como esto:
> 
> Xstep Per-Hop Global Sink
> 10 390543 337155 167955
> 30 299127 255934 127607
> 60 222029 188617 94113 
> 
> 



-- 
Dr. Félix Jesús Villanueva Molina
Associate Professor
School of Computer Science
Paseo de la Universidad, 4
13071 Ciudad Real (Spain)
http://arco.esi.uclm.es