login
A117796
Enneagonal numbers divisible by 9.
1
0, 9, 261, 396, 1089, 1350, 2484, 2871, 4446, 4959, 6975, 7614, 10071, 10836, 13734, 14625, 17964, 18981, 22761, 23904, 28125, 29394, 34056, 35451, 40554, 42075, 47619, 49266, 55251, 57024, 63450, 65349, 72216, 74241, 81549, 83700, 91449
OFFSET
1,2
COMMENTS
Intersection of A008591 and A001106. - Michel Marcus, Feb 27 2014
LINKS
MATHEMATICA
Select[Table[PolygonalNumber[9, n], {n, 0, 170}], Divisible[#, 9] &] (* Amiram Eldar, Mar 22 2021 *)
PROG
(PARI) isok(n) = ispolygonal(n, 9) && !(n % 9); \\ Michel Marcus, Feb 27 2014
CROSSREFS
Sequence in context: A001823 A229259 A376096 * A117051 A173985 A280178
KEYWORD
easy,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 29 2006
STATUS
approved