A070509 - OEIS

%I #21 Dec 18 2023 15:11:51

%S 0,1,8,27,17,31,28,14,42,24,13,15,36,35,18,38,7,25,4,44,10,2,26,41,6,

%T 21,45,37,3,43,22,40,9,29,12,11,32,34,23,5,33,19,16,30,20,39,46,0,1,8,

%U 27,17,31,28,14,42,24,13,15,36,35,18,38,7,25,4,44,10,2,26,41,6,21,45

%N a(n) = n^3 mod 47.

%H G. C. Greubel, <a href="/A070509/b070509.txt">Table of n, a(n) for n = 0..1000</a>

%H <a href="/index/Rec#order_47">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, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).

%F a(n) = a(n-47). - _G. C. Greubel_, Apr 01 2016

%t PowerMod[Range[0,80],3,47] (* _Harvey P. Dale_, May 30 2015 *)

%o (Sage) [power_mod(n,3,47) for n in range(0, 74)] # _Zerinvary Lajos_, Oct 30 2009

%o (Magma) [Modexp(n, 3, 47): n in [0..80]]; // _Bruno Berselli_, Mar 31 2016

%o (PARI) a(n)=n^3%47 \\ _Charles R Greathouse IV_, Apr 06 2016

%K nonn,easy

%O 0,3

%A _N. J. A. Sloane_, May 12 2002