|
| |
|
|
A124286
|
|
Number of integer-sided hexagons having perimeter n.
|
|
2
| |
|
|
0, 0, 0, 0, 0, 1, 1, 4, 7, 15, 25, 46, 72, 113, 172, 248, 360, 491, 686, 896, 1217, 1536, 2031, 2504, 3236, 3905, 4955, 5880, 7336, 8586, 10556, 12208, 14823, 16964, 20364, 23106, 27456, 30906, 36399, 40692, 47532, 52816, 61237, 67672, 77941, 85701
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,8
|
|
|
COMMENTS
| Rotations and reversals are counted only once. Note that this is different from A069907, which counts hexagons whose sides are nondecreasing.
|
|
|
EXAMPLE
| The four hexagons having perimeter 8 are (1,1,1,1,2,2), (1,1,1,2,1,2), (1,1,2,1,1,2) and (1,1,1,1,1,3).
|
|
|
MATHEMATICA
| Needs["DiscreteMath`Combinatorica`"]; Table[s=Select[Partitions[n], Length[ # ]==6 && #[[1]]<Total[Rest[ # ]]&]; cnt=0; Do[cnt=cnt+Length[ListNecklaces[6, s[[i]], Dihedral]], {i, Length[s]}]; cnt, {n, 50}]
|
|
|
CROSSREFS
| Cf. A057886 (quadrilaterals), A124285 (pentagons), A124287 (k-gons).
Sequence in context: A092309 A039669 A109622 * A027419 A116969 A131090
Adjacent sequences: A124283 A124284 A124285 * A124287 A124288 A124289
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| T. D. Noe (noe(AT)sspectra.com), Oct 24 2006
|
| |
|
|
