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 A130875 #20 Dec 12 2023 09:38:39 %S A130875 1,7,1,3,1,1,3,1,7,9,1,7,1,3,1,1,3,1,7,9,1,7,1,3,1,1,3,1,7,9,1,7,1,3, %T A130875 1,1,3,1,7,9,1,7,1,3,1,1,3,1,7,9,1,7,1,3,1,1,3,1,7,9,1,7,1,3,1,1,3,1, %U A130875 7,9,1,7,1,3,1,1,3,1,7,9,1,7,1,3,1,1,3,1,7,9,1,7,1,3,1,1,3,1,7,9,1,7,1,3,1 %N A130875 Absolute difference of final digits of two consecutive cubes. %C A130875 Periodic with period 10. %H A130875 <a href="/index/Rec#order_10">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,0,0,0,0,1). %F A130875 a(n) = a(n-10). - _Colin Barker_, Dec 04 2014 %F A130875 G.f.: -x*(9*x^9+7*x^8+x^7+3*x^6+x^5+x^4+3*x^3+x^2+7*x+1) / ((x-1)*(x+1)*(x^4-x^3+x^2-x+1)*(x^4+x^3+x^2+x+1)). - _Colin Barker_, Dec 04 2014 %t A130875 LinearRecurrence[{0, 0, 0, 0, 0, 0, 0, 0, 0, 1},{1, 7, 1, 3, 1, 1, 3, 1, 7, 9},105] (* _Ray Chandler_, Aug 26 2015 *) %t A130875 Abs[Differences[Mod[#,10]]]&/@Partition[Range[0,120]^3,2,1]//Flatten (* or *) PadRight[{},120,{1,7,1,3,1,1,3,1,7,9}] (* _Harvey P. Dale_, Oct 27 2019 *) %o A130875 (PARI) Vec(-x*(9*x^9+7*x^8+x^7+3*x^6+x^5+x^4+3*x^3+x^2+7*x+1)/((x-1)*(x+1)*(x^4-x^3+x^2-x+1)*(x^4+x^3+x^2+x+1)) + O(x^100)) \\ _Colin Barker_, Dec 04 2014 %Y A130875 Cf. A008960. %K A130875 base,easy,nonn %O A130875 1,2 %A A130875 _Giovanni Teofilatto_, Jul 25 2007