Hola,

Utiliza el detalle que aparece en legend(). Especifica la posición de la
leyenda vía:

The location may also be specified by setting x to a single keyword from the
list "bottomright", "bottom", "bottomleft", "left", "topleft", "top",
"topright", "right" and "center". This places the legend on the inside of
the plot frame at the given location.


Saludos,
Carlos Ortega
www.qualityexcellence.es
http://qualityexcellence.wordpress.com/ (Blog)

2011/5/18 Felix.Villanueva <felix.villanueva@uclm.es>

> 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
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>

	[[alternative HTML version deleted]]

