cp's OEIS Frontend

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.

A345240 a(1) = 1; thereafter a(n) = A161406(a(n-1)).

This page as a plain text file.
%I A345240 #24 Sep 26 2024 19:37:29
%S A345240 1,52,158,229,278,284,304,235,289,291,300,153,251,298,291,300,153,251,
%T A345240 298,291,300,153,251,298,291,300,153,251,298,291,300,153,251,298,291,
%U A345240 300,153,251,298,291,300,153,251,298,291,300,153,251,298,291,300,153,251,298
%N A345240 a(1) = 1; thereafter a(n) = A161406(a(n-1)).
%C A345240 A Spanish analog of A345126 (British English) and A345157 (US English).
%C A345240 Starting from n = 10 the sequence becomes periodic with period 5: repeat [291, 300, 153, 251, 298].
%H A345240 <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,1).
%t A345240 a[1]=1;a[n_]:=a[n]=Total[If[#=="ñ",15,If[(s=LetterNumber@#)>14,s+1,s]]&/@Characters@StringDelete[IntegerName[a[n-1],"Spanish"],{" ","-"}]];Array[a,100] (* _Giorgos Kalogeropoulos_, Jun 11 2021 *)
%t A345240 PadRight[{1,52,158,229,278,284,304,235,289},120,{300,153,251,298,291}] (* _Harvey P. Dale_, Sep 26 2024 *)
%Y A345240 Cf. A073327, A161406, A169639, A344013, A345126, A345157.
%K A345240 nonn,word,easy
%O A345240 1,2
%A A345240 _Omar E. Pol_ and _N. J. A. Sloane_, Jun 11 2021