A147521 a(n) is the smallest value of Euler polynomial x^2 + x + 41 which is divisible by 41^n.
41, 1681, 2963603, 19477970573, 203586339651833, 2677331022258108347, 40785586686127252393, 3817838920923578492820563, 22427952844519540079208409331, 3292526219739666997778171798741, 59254464597252454704406353071130683, 93363909561408736238900593787191180421
Offset: 1
Keywords
Programs
-
Mathematica
a = {}; Do[x = 0; While[Mod[x^2 + x + 41, 41^n] != 0, x++ ]; AppendTo[a,x^2 + x + 41];Print[{n, x, x^2 + x + 41, (x^2 + x + 41)/41^n}], {n, 1, 6}];a
Extensions
a(7)-a(12) from Hugo Pfoertner, Jan 12 2019
Comments