[go: up one dir, main page]
More Web Proxy on the site http://driver.im/
login
A273223
a(n) = p*(p - 1)*(501*p^3 - 414*p^2 + 111*p - 54)/120, where p = prime(n).
2
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
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
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, May 19 2016
STATUS
approved