This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A070433 #42 Nov 29 2022 06:00:05 %S A070433 0,1,4,0,7,7,0,4,1,0,1,4,0,7,7,0,4,1,0,1,4,0,7,7,0,4,1,0,1,4,0,7,7,0, %T A070433 4,1,0,1,4,0,7,7,0,4,1,0,1,4,0,7,7,0,4,1,0,1,4,0,7,7,0,4,1,0,1,4,0,7, %U A070433 7,0,4,1,0,1,4,0,7,7,0,4,1,0,1,4,0,7,7,0,4,1,0,1,4,0,7,7,0,4,1,0,1 %N A070433 a(n) = n^2 mod 9. %C A070433 Also decimal expansion of 4692347/333333333. - _Enrique Pérez Herrero_, Nov 27 2022 %H A070433 <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,0,0,0,1). %F A070433 From _R. J. Mathar_, Apr 20 2010: (Start) %F A070433 a(n) = a(n-9). %F A070433 G.f.: ( -x*(1+x)*(x^6+3*x^5-3*x^4+10*x^3-3*x^2+3*x+1) ) / ( (x-1)*(1+x+x^2)*(x^6+x^3+1) ). (End) %F A070433 a(n) = A010878(A000290(n)) = A010878(n^2). - _Enrique Pérez Herrero_, Nov 27 2022 %t A070433 Table[Mod[n^2,9],{n,0,200}] (* _Vladimir Joseph Stephan Orlovsky_, Apr 21 2011 *) %t A070433 PowerMod[Range[0,200],2,9] (* _Harvey P. Dale_, Jun 11 2011 *) %o A070433 (PARI) a(n)=[0,1,4,0,7,7,0,4,1][n%9+1] \\ _Charles R Greathouse IV_, Jun 11 2011 %o A070433 (PARI) a(n)=n^2%9 \\ _Charles R Greathouse IV_, Jun 11 2011 %Y A070433 Cf. A000290, A010878, A053879, A070430, A070431. %K A070433 nonn,easy %O A070433 0,3 %A A070433 _N. J. A. Sloane_, May 12 2002