login
a(n) is smallest number such that a(n)^2 + 1 is divisible by 97^n.
1

%I #4 Nov 05 2012 12:20:38

%S 0,22,4052,107551,22709274,331407850,197177418061,26457926739667,

%T 2369608176604944,76004727767164666,25163629663367816827,

%U 1965881512952938486496,191165497320828772935835,21700278688179406782082106,560121950820639295011033922

%N a(n) is smallest number such that a(n)^2 + 1 is divisible by 97^n.

%e a(3) = 107551 because 107551^2+1 = 2 * 97 ^ 3 * 6337.

%t b=22;n97=97;jo=Join[{0,b},Table[n97=97*n97;b=PowerMod[b, 97,n97];b=Min[b,n97-b],{99}]]

%Y Cf. A002522, A049532, A034939, A218709, A218710, A218712, A218713, A218714, A218715, A218716, A218717, A218718.

%K nonn

%O 0,2

%A _Michel Lagneau_, Nov 04 2012