login
A294264
a(n) = (5/128)*n^4*(n mod 2) + (((-5/128)*n^4*(n mod 2) - 26) mod n) + n^3 (n > 0).
1
2, 8, 31, 66, 154, 220, 443, 518, 991, 1004, 1910, 1738, 3315, 2746, 5359, 4102, 8185, 5842, 11963, 8014, 16858, 10666, 23112, 13846, 30899, 17576, 40447, 21954, 52029, 27004, 65880, 32774, 82276, 39312, 101509, 46666, 123887, 54884, 149695, 64014, 179308, 74104, 213082
OFFSET
1,1
LINKS
FORMULA
a(n) = (5/128)*n^4*(n mod 2) + (((-5/128)*n^4*(n mod 2) - 26) mod n) + n^3 (n > 0).
MATHEMATICA
Map[ Mod[-5/128*#^4*Mod[#, 2] - 26, #] + 5/128*#^4*Mod[#, 2] + #^3 &, Range[10^5]]
PROG
(PARI)
rmod(n, m)={n-n\m*m}
a(n)={(5/128)*n^4*(n % 2) + rmod(((-5/128)*n^4*(n % 2) - 26), n) + n^3} \\ Andrew Howroyd, Feb 28 2018
CROSSREFS
Sequence in context: A358962 A265950 A359117 * A367037 A007468 A280156
KEYWORD
nonn
AUTHOR
Mikk Heidemaa, Oct 26 2017
STATUS
approved