/ 
math-image-47
River stage zero No dependents
/ Math::PlanePath::MathImageOctagramSpiral

NAME

Math::PlanePath::MathImageOctagramSpiral -- integer points drawn around an octagram

SYNOPSIS

use Math::PlanePath::MathImageOctagramSpiral;
my $path = Math::PlanePath::MathImageOctagramSpiral->new;
my ($x, $y) = $path->n_to_xy (123);

DESCRIPTION

This path makes a spiral around an octagram (8-pointed star),

      29          25                  4
       | \       / |
      30 28    26 24    ...56-55      3       
       |   \  /    |         /
33-32-31  7 27  5 23-22-21 54         2
  \       |\  / |      /  /
   34  9- 8  6  4- 3 20 53            1
     \  \        /  /  /
      35 10  1--2 19 52          <- y=0
     /  /           \  \  
   36 11-12 14 16-17-18 51           -1
  /       |/  \ |         \
37-38-39 13 43 15 47-48-49-50        -2
       |   /  \    |
      40 42    44 46                 -3
       |/        \ |
      41          45                 -4

             ^
-4 -3 -2 -1 x=0 1  2  3  4  5 ...

Each loop is 16 longer than the previous. The 18-gonal numbers are the horizontal 18,51,100,etc at Y=-1.

The inner corners like 23, 31, 39, 47 are like the SquareSpiral path, but instead of going directly between those points the octagram takes a detour out to make the points of the star. Those 8 excursions each successive loops 1 longer, hence a step of 16 here as compared to 8 for the SquareSpiral.

FUNCTIONS

$path = Math::PlanePath::MathImageOctagramSpiral->new ()

Create and return a new octagram spiral object.

($x,$y) = $path->n_to_xy ($n)

Return the x,y coordinates of point number $n on the path.

For $n < 1 the return is an empty list, it being considered the path starts at 1.

$n = $path->xy_to_n ($x,$y)

Return the point number for coordinates $x,$y. $x and $y are each rounded to the nearest integer, which has the effect of treating each N in the path as centred in a square of side 1, so the entire plane is covered.

SEE ALSO

Math::PlanePath, Math::PlanePath::SquareSpiral, Math::PlanePath::PyramidSpiral

HOME PAGE

http://user42.tuxfamily.org/math-image/index.html

LICENSE

Math-Image is Copyright 2010, 2011 Kevin Ryde

Math-Image is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version.

Math-Image 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 General Public License for more details.

You should have received a copy of the GNU General Public License along with Math-Image. If not, see <http://www.gnu.org/licenses/>.