login
A117797
Decagonal numbers divisible by 10.
1
0, 10, 370, 540, 1540, 1870, 3510, 4000, 6280, 6930, 9850, 10660, 14220, 15190, 19390, 20520, 25360, 26650, 32130, 33580, 39700, 41310, 48070, 49840, 57240, 59170, 67210, 69300, 77980, 80230, 89550, 91960, 101920, 104490, 115090, 117820
OFFSET
1,2
COMMENTS
Intersection of A008592 and A001107. - Michel Marcus, Feb 27 2014
LINKS
MATHEMATICA
Select[Table[PolygonalNumber[10, n], {n, 0, 175}], Divisible[#, 10] &] (* Amiram Eldar, Mar 22 2021 *)
PROG
(PARI) isok(n) = ispolygonal(n, 10) && !(n % 10); \\ Michel Marcus, Feb 27 2014
CROSSREFS
Sequence in context: A051790 A220638 A119547 * A301311 A291530 A358801
KEYWORD
easy,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 29 2006
STATUS
approved