|
|
A028993
|
|
Odd 10-gonal (or decagonal) numbers.
|
|
4
|
|
|
1, 27, 85, 175, 297, 451, 637, 855, 1105, 1387, 1701, 2047, 2425, 2835, 3277, 3751, 4257, 4795, 5365, 5967, 6601, 7267, 7965, 8695, 9457, 10251, 11077, 11935, 12825, 13747, 14701, 15687, 16705, 17755, 18837, 19951, 21097, 22275, 23485, 24727, 26001, 27307, 28645
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
Sum_{n>=0} 1/a(n) = (4*log(2) + (sqrt(2)+1)*Pi + 2*sqrt(2)*log(1+sqrt(2)))/12. - Amiram Eldar, Feb 27 2022
|
|
MAPLE
|
|
|
MATHEMATICA
|
CoefficientList[Series[-(7 x^2 + 24 x + 1)/(x - 1)^3, {x, 0, 40}], x] (* Vincenzo Librandi, Oct 18 2013 *)
Select[PolygonalNumber[10, Range[100]], OddQ] (* or *) LinearRecurrence[{3, -3, 1}, {1, 27, 85}, 50] (* Harvey P. Dale, May 03 2023 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|