A294264 a(n) = (5/128)*n^4*(n mod 2) + (((-5/128)*n^4*(n mod 2) - 26) mod n) + n^3 (n > 0).

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

Andrew Howroyd, Table of n, a(n) for n = 1..1000

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

Adjacent sequences: A294261 A294262 A294263 * A294265 A294266 A294267

Keyword

nonn

Author

Mikk Heidemaa, Oct 26 2017

Status

approved