nancynyk at gmail.com
2010-Jul-17 16:21 UTC
[R] Bug 14340 - Symbols() plots with wrongly scaled y-axis
Hello, I submitted this bug report to r-core and got a rejection
saying I should post to r-help.
This is my first time ever submitting a bug report, so forgive me if
I'm using some wrong format.
So, here's my bug report:
Component: Graphics
OS: Mac OS 10.5.8, X11 XQuartz 2.5.0
Summary:
In the symbols function of the graphics package, scaling of the y-axis is
wrong, causing symbols that should be separate to overlap in the y-direction
(x-direction is okay).
Description:
Attached is a plot that should be of circles of radius 5 spaced exactly with
their centers 10 apart in both x and y directions, so that they should be
packed with the circles touching edge-to-edge. In the y-direction, somehow the
plotting scale is wrong such that the circles overlap. I've plotted
horizontal
and vertical lines at x=45,50,55, and y=45,50,55, as well as two squares with
side=10. The squares are also overlapping in the vertical scale.
Steps to reproduce:
Here are the commands I used to generate this:
maptrees =
function(n=1,a=1,b=1,h=2,view="horz",fg=1,np=FALSE,add=TRUE) {
#n = tree density (#/m2)
#a = crown horizontal radius (m)
#b = crown vertical radius (m)
#h = tree height (m)
#view = "horz", "vert"
#np = TRUE if new plot desired
if (np) {
quartz(width=6, height=6)
add=!np
}
dx = sqrt(1/n)
x = rep(dx*(1:10),10)
y = as.vector(t(matrix(x,10,10)))
if (view=="horz") {
circles = rep(a,100)
symbols(x=x,y=y,circles=circles, fg=fg,inches=FALSE,add=add)
points(x,y,pch='.')
mtext(paste("n=",n,", d=",dx,", a=",a))
} else {
#mtext(paste("n=",n,", d=",dx,",
a=",a,", b=",b,", h=",h))
}
return(cbind(x,y,circles))
}
Commands:
junk =maptrees(n= 0.01, a=5,add=FALSE)
lines(c(0,100),c(45,45))
lines(c(0,100),c(55,55))
lines(c(0,100),c(50,50))
lines(c(50,50),c(0,100))
lines(c(55,55),c(0,100))
lines(c(45,45),c(0,100))
symbols(50,50,squares=10,fg=2, add=TRUE,inches=FALSE)
symbols(50,60,squares=10,fg=2, add=TRUE,inches=FALSE)
Actual results: See attached plot.
Expected results: The circles and squares in the plot should be edge-to-edge,
not overlapping in the vertical direction.
Build Date and Platform: Build 2010-7-16 on Mac 10.5.8
I am using a MacBookPro:
platform x86_64-apple-darwin9.8.0
arch x86_64
os darwin9.8.0
system x86_64, darwin9.8.0
status
major 2
minor 11.1
year 2010
month 05
day 31
svn rev 52157
language R
version.string R version 2.11.1 (2010-05-31)
I could not find another bug report of this problem.
Thanks to anyone who can help.
Nancy Kiang
--
baptiste auguie
2010-Jul-17 16:55 UTC
[R] Bug 14340 - Symbols() plots with wrongly scaled y-axis
Hi, try adding asp=1 in symbols() to set the aspect ratio of the plotting region to 1. HTH, baptiste On 17 July 2010 18:21, <nancynyk at gmail.com> wrote:> Hello, I submitted this bug report to r-core and got a rejection saying I > should post to r-help. > This is my first time ever submitting a bug report, so forgive me if I'm > using some wrong format. > > So, here's my bug report: > > Component: ?Graphics > OS: ?Mac OS 10.5.8, X11 XQuartz 2.5.0 > Summary: > In the symbols function of the graphics package, scaling of the y-axis is > wrong, causing symbols that should be separate to overlap in the y-direction > (x-direction is okay). > > Description: > Attached is a plot that should be of circles of radius 5 spaced exactly with > their centers 10 apart in both x and y directions, so that they should be > packed with the circles touching edge-to-edge. ?In the y-direction, somehow > the > plotting scale is wrong such that the circles overlap. ?I've plotted > horizontal > and vertical lines at x=45,50,55, and y=45,50,55, as well as two squares > with > side=10. ?The squares are also overlapping in the vertical scale. > > Steps to reproduce: > Here are the commands I used to generate this: > > maptrees = function(n=1,a=1,b=1,h=2,view="horz",fg=1,np=FALSE,add=TRUE) { > ? ?#n = tree density (#/m2) > ? ?#a = crown horizontal radius (m) > ? ?#b = crown vertical radius (m) > ? ?#h = tree height (m) > ? ?#view = "horz", "vert" > ? ?#np = TRUE if new plot desired > > ? ?if (np) { > ? ? ? ?quartz(width=6, height=6) > ? ? ? ?add=!np > ? ? ? ?} > > ? ?dx = sqrt(1/n) > ? ?x = rep(dx*(1:10),10) > ? ?y = as.vector(t(matrix(x,10,10))) > > ? ?if (view=="horz") { > ? ? ? ?circles = rep(a,100) > ? ? ? ?symbols(x=x,y=y,circles=circles, fg=fg,inches=FALSE,add=add) > ? ? ? ?points(x,y,pch='.') > ? ? ? ?mtext(paste("n=",n,", d=",dx,", a=",a)) > ? ?} else { > ? ? ? ?#mtext(paste("n=",n,", d=",dx,", a=",a,", b=",b,", h=",h)) > > ? ?} > ? ?return(cbind(x,y,circles)) > ? ?} > > Commands: > ? ?junk =maptrees(n= 0.01, a=5,add=FALSE) > ? ?lines(c(0,100),c(45,45)) > ? ?lines(c(0,100),c(55,55)) > ? ?lines(c(0,100),c(50,50)) > > ? ?lines(c(50,50),c(0,100)) > ? ?lines(c(55,55),c(0,100)) > ? ?lines(c(45,45),c(0,100)) > ? ?symbols(50,50,squares=10,fg=2, add=TRUE,inches=FALSE) > ? ?symbols(50,60,squares=10,fg=2, add=TRUE,inches=FALSE) > > Actual results: ?See attached plot. > Expected results: ?The circles and squares in the plot should be > edge-to-edge, > not overlapping in the vertical direction. > Build Date and Platform: Build 2010-7-16 on Mac 10.5.8 > > > I am using a MacBookPro: > platform ? ? ? x86_64-apple-darwin9.8.0 > arch ? ? ? ? ? x86_64 > os ? ? ? ? ? ? darwin9.8.0 > system ? ? ? ? x86_64, darwin9.8.0 > status > major ? ? ? ? ?2 > minor ? ? ? ? ?11.1 > year ? ? ? ? ? 2010 > month ? ? ? ? ?05 > day ? ? ? ? ? ?31 > svn rev ? ? ? ?52157 > language ? ? ? R > version.string R version 2.11.1 (2010-05-31) > > I could not find another bug report of this problem. > > Thanks to anyone who can help. > > Nancy Kiang > > -- > > > ______________________________________________ > R-help at r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > >-- ____________________ Dr. Baptiste Augui? Departamento de Qu?mica F?sica, Universidade de Vigo, Campus Universitario, 36310, Vigo, Spain tel: +34 9868 18617 http://webs.uvigo.es/coloides