|
%I #25 Feb 12 2024 10:35:13
%S 0,1,8,27,4,5,6,13,2,9,10,11,18,7,14,15,16,23,12,19,20,21,28,17,24,25,
%T 26,3,22,29,0,1,8,27,4,5,6,13,2,9,10,11,18,7,14,15,16,23,12,19,20,21,
%U 28,17,24,25,26,3,22,29,0,1,8,27,4,5,6,13,2,9,10,11,18,7,14,15,16,23
%N a(n) = n^3 mod 30.
%C Equivalently n^7 mod 30. - _Zerinvary Lajos_, Oct 29 2009
%C Equivalent: n^(4m+3) mod 30, m>=0, m integer. - _G. C. Greubel_, Mar 30 2016
%H G. C. Greubel, <a href="/A070492/b070492.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Rec#order_30">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, 1).
%F a(n) = a(n-30). - _G. C. Greubel_, Mar 30 2016
%F G.f.: -x*(1 +8*x +27*x^2 +3*x^26 +22*x^27 +29*x^28 +4*x^3 +5*x^4 +6*x^5 +13*x^6 +2*x^7 +9*x^8 +10*x^9 +18*x^11 +11*x^10 +7*x^12 +14*x^13 +15*x^14 +16*x^15 +23*x^16 +12*x^17 +19*x^18 +20*x^19 +21*x^20 +28*x^21 +17*x^22 +24*x^23 +25*x^24 +26*x^25) / ( (x-1) *(1+x^4+x^3+x^2+x) *(1+x+x^2)*(1-x+x^3-x^4+x^5-x^7+x^8) *(1+x) *(1-x+x^2-x^3+x^4) *(1-x+x^2) *(1+x-x^3-x^4-x^5+x^7+x^8) ). - _R. J. Mathar_, Feb 12 2024
%t PowerMod[Range[0,80],3,30] (* _Harvey P. Dale_, Jun 09 2013 *)
%o (Sage) [power_mod(n,3,30)for n in range(0, 78)] # _Zerinvary Lajos_, Oct 29 2009
%o (PARI) a(n)=n^3%30 \\ _Charles R Greathouse IV_, Apr 06 2016
%K nonn,easy
%O 0,3
%A _N. J. A. Sloane_, May 12 2002
|
