blob: 3042267fba38df50c81ec6c02892dd28addbe015 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
// Stem plot
// Updated (1-12-06)
function stem(x,y,xy)
if argn(2) == 2
xy = 5;
end;
set("figure_style","new")
plot2d3(x,y,style=2);
//plot2d4(x,y,style=-9); // default mark foreground colour: black
// Can be used instead of xpoly
// But default values cannot be changed
xpoly(x,y,"marks");
p=get("hdl");
p.mark_size_unit = 'point';
p.mark_size = xy;
p.mark_style = 9;
p.mark_foreground = 2;
p.mark_background = 2;
endfunction;
|
