login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) = n^5 mod 38.
1

%I #17 Dec 26 2023 22:13:59

%S 0,1,32,15,36,9,24,11,12,35,22,7,8,33,10,21,4,25,18,19,20,13,34,17,28,

%T 5,30,31,16,3,26,27,14,29,2,23,6,37,0,1,32,15,36,9,24,11,12,35,22,7,8,

%U 33,10,21,4,25,18,19,20,13,34,17,28,5,30,31,16,3,26,27,14,29,2,23,6,37

%N a(n) = n^5 mod 38.

%H Vincenzo Librandi, <a href="/A070621/b070621.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). - _Wesley Ivan Hurt_, Dec 26 2023

%t PowerMod[Range[0, 100], 5, 38] (* _Vincenzo Librandi_, Jun 15 2016 *)

%o (Sage) [power_mod(n,5,38)for n in range(0, 76)] # - _Zerinvary Lajos_, Nov 04 2009

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

%o (Magma) [Modexp(n, 5, 38): n in [0..80]]; // _Vincenzo Librandi_, Jun 15 2016

%K nonn,easy

%O 0,3

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