1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
# $Id: xw13.py 11680 2011-03-27 17:57:51Z airwin $
# Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 Alan W. Irwin
# Pie chart demo.
#
# This file is part of PLplot.
#
# PLplot is free software; you can redistribute it and/or modify
# it under the terms of the GNU Library General Public License as published
# by the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# PLplot is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU Library General Public License for more details.
#
# You should have received a copy of the GNU Library General Public License
# along with PLplot; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
#
from plplot_py_demos import *
text = ["Maurice",
"Geoffrey",
"Alan",
"Rafael",
"Vince"]
# main
#
# Does a simple pie chart.
def main():
pladv(0)
# Ensure window has aspect ratio of one so circle is
# plotted as a circle.
plvasp(1.0)
plwind(0., 10., 0., 10.)
#plenv(0., 10., 0., 10., 1, -2)
plcol0(2)
#if these don't add up to 100, the logic adds to the last to make
#up the balance.
per = [10., 32., 12., 30., 16.]
theta0 = 0
for i in range(5):
#theta quantities scaled as integers to make logic independent of
#floating point considerations.
#n.b. theta multiplied by 2 pi/500 afterward so per is in fact
#interpreted as a percentage.
theta1 = theta0 + int(5.*per[i])
if i == 4:
theta1 = 500
theta = arange(theta0,theta1+1)
x = concatenate((array([5.]), (5. + 3.*cos((2.*pi/500.)*theta))))
y = concatenate((array([5.]), (5. + 3.*sin((2.*pi/500.)*theta))))
plcol0(i + 1)
plpsty((i + 3) % 8 + 1)
plfill(x, y)
plcol0(1)
plline(x, y)
just = (2.*pi/500.)*(theta0 + theta1) / 2.
dx = .25 * cos(just)
dy = .25 * sin(just)
if (theta0 + theta1) < 250 or (theta0 + theta1) > 750:
just = 0.
else:
just = 1.
mid = len(x) / 2
plptex((x[mid] + dx), (y[mid] + dy), 1.0, 0.0, just, text[i])
theta0 = theta[-1]
plfont(2)
plschr(0., 1.3)
plptex(5.0, 9.0, 1.0, 0.0, 0.5, "Percentage of Sales")
# Restore defaults
plfont(1)
#plcol0(1)
main()
|
