|
%I #16 Dec 18 2023 12:59:09
%S 0,1,4,9,16,25,36,11,26,5,24,7,30,17,6,35,28,23,20,19,20,23,28,35,6,
%T 17,30,7,24,5,26,11,36,25,16,9,4,1,0,1,4,9,16,25,36,11,26,5,24,7,30,
%U 17,6,35,28,23,20,19,20,23,28,35,6,17,30,7,24,5,26,11,36,25,16,9,4,1,0,1,4
%N a(n) = n^2 mod 38.
%H G. C. Greubel, <a href="/A070460/b070460.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Rec#order_38">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
%F a(n) = a(n-38). - _G. C. Greubel_, Mar 25 2016
%t Table[Mod[n^2,38],{n,0,200}] (* _Vladimir Joseph Stephan Orlovsky_, Apr 27 2011 *)
%t PowerMod[Range[0,80],2,38] (* _Harvey P. Dale_, Feb 10 2015 *)
%o (PARI) a(n)=n^2%38 \\ _Charles R Greathouse IV_, Apr 06 2016
%Y Cf. A070456, A070457.
%K nonn,easy
%O 0,3
%A _N. J. A. Sloane_, May 12 2002
|
