Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re: GD::Graph vertical line

by Albannach (Prior)
on Apr 02, 2004 at 19:40 UTC ( #342101=note: print w/replies, xml ) Need Help??

in reply to GD::Graph vertical line

A slightly different ugly hack, in an attempt to make more use of what GD::Graph provides:
my $chosen_x = ($graph->GD::Graph::axestype::val_to_pixel(5,0,1))[0]; +# only the 5 matters here my @ys = @{$graph->get_feature_coordinates('axes')}[2,4]; # the y coor +ds of the chart box $graph->{graph}->line($chosen_x, $ys[0], $chosen_x, $ys[1], 8); # 8 is + black, or you could colorAllocate() something
In my test it seems to line up the vertical better than in tachyon's example, but there may be other reasons for that too. The val_to_pixel() subroutine could be really handy for drawing objects, or inserting bitmaps too, I'll have to play with that some more.

I'd like to be able to assign to an luser

Replies are listed 'Best First'.
Re: Re: GD::Graph vertical line
by tachyon (Chancellor) on Apr 03, 2004 at 08:04 UTC

    Yes, I know what you mean. Depending on the value my hack may or may not have a 1 pixel left offset from the tick mark. Mostly it lines up as expected. I was too lazy to look at the tick code to see how the rounding to integer is being done.



Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://342101]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (5)
As of 2017-04-29 07:27 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (531 votes). Check out past polls.