mantao/Plots.jl
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

gadfly shapes

Browse Source
This commit is contained in:
Thomas Breloff 2015-09-18 01:55:16 -04:00
parent 1a490551e6
commit 56cf25eebf
1 changed files with 2 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/backends/gadfly_shapes.jl
View File

@ -217,18 +217,11 @@ function hexagon(xs::AbstractArray, ys::AbstractArray, rs::AbstractArray)
r = rs[mod1(i, length(rs))]
u = 0.6r
# make a "plus sign"
polys[i] = Tuple{Compose.Measure, Compose.Measure}[
(x-r, y-u), (x-r, y+u), # L edge
# (x-u, y+u), # BL inside
# (x-u, y+r), (x+u, y+r), # B edge
(x, y+r),
# (x+u, y+u), # BR inside
(x, y+r), # B
(x+r, y+u), (x+r, y-u), # R edge
(x, y-r)
# (x+u, y-u), # TR inside
# (x+u, y-r), (x-u, y-r), # T edge
# (x-u, y-u) # TL inside
(x, y-r) # T
]
end
@ -246,16 +239,11 @@ function octagon(xs::AbstractArray, ys::AbstractArray, rs::AbstractArray)
r = rs[mod1(i, length(rs))]
u = 0.4r
# make a "plus sign"
polys[i] = Tuple{Compose.Measure, Compose.Measure}[
(x-r, y-u), (x-r, y+u), # L edge
# (x-u, y+u), # BL inside
(x-u, y+r), (x+u, y+r), # B edge
# (x+u, y+u), # BR inside
(x+r, y+u), (x+r, y-u), # R edge
# (x+u, y-u), # TR inside
(x+u, y-r), (x-u, y-r), # T edge
# (x-u, y-u) # TL inside
]
end