A273223 a(n) = p*(p - 1)*(501*p^3 - 414*p^2 + 111*p - 54)/120, where p = prime(n).

42, 504, 8796, 53298, 566412, 1341756, 5312160, 9373536, 24790458, 80346588, 112613886, 275440284, 462452448, 588037212, 920759046, 1686448764, 2893307844, 3421602972, 5484429720, 7340452434, 8440231968, 12551864598, 16086117120, 22838112000, 35181089856

Offset

1,1

Links

Seiichi Manyama, Table of n, a(n) for n = 1..10000

F. V. Weinstein, Notes on Fibonacci partitions, arXiv:math/0307150 [math.NT], 2003-2015, page 22.

Mathematica

Table[p = Prime[n]; p (p - 1) (501 p^3 - 414 p^2 + 111 p - 54) / 120, {n, 40}]

Prog

(Magma) [p*(p-1)*(501*p^3-414*p^2+111*p-54)/120: p in PrimesUpTo(200)];

Crossrefs

Cf. A006093, A008837, A179545, A273221, A273222.

Sequence in context: A250324 A086944 A263289 * A163727 A160065 A196671

Adjacent sequences: A273220 A273221 A273222 * A273224 A273225 A273226

Keyword

nonn

Author

Vincenzo Librandi, May 19 2016

Status

approved