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.

Showing 1-2 of 2 results.

A345126 a(1) = 1; thereafter, a(n) = A073327(a(n-1)), using the British English version of A073327 when there is a choice.

Original entry on oeis.org

1, 34, 160, 224, 318, 222, 316, 245, 277, 326, 308, 198, 263, 304, 209, 193, 270, 261, 282, 283, 281, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259, 259
Offset: 1

Views

Author

Paul Duckett, Jun 08 2021

Keywords

Comments

This sequence uses UK English names (e.g., one hundred and one).
Theorem: All nonnegative integers eventually reach either the fixed point 251, the fixed point 259, or the five-cycle 248, 284, 285, 267, 313.

Examples

			a(1) =   1 = ONE                   => A073327(1)   =  34,
a(2) =  34 = THIRTY FOUR           => A073327(34)  = 160,
a(3) = 160 = ONE HUNDRED AND SIXTY => A073327(160) = 224, and so on.
		

Crossrefs

See also A345240 (a Spanish version).

Programs

Extensions

Edited by N. J. A. Sloane, Jun 09 2021
Corrected (at the suggestion of Stephen Cornelius) and extended by Sean A. Irvine, May 01 2022

A344013 a(1)=1; thereafter a(n) = A169639(a(n-1)).

Original entry on oeis.org

1, 35, 125, 157, 206, 148, 197, 293, 333, 286, 302, 177, 246, 245, 236, 230, 178, 244, 275, 295, 342, 274, 326, 247, 253, 281, 285, 293, 333, 286, 302, 177, 246, 245, 236, 230, 178, 244, 275, 295, 342, 274, 326, 247, 253, 281, 285, 293, 333, 286, 302, 177, 246, 245, 236, 230, 178, 244, 275
Offset: 1

Views

Author

Simon Plouffe and N. J. A. Sloane, Jun 10 2021

Keywords

Comments

A French analog of A345126 (British English) and A345157 (US English).
Enters a cycle of length 20 starting from a(8). - Chai Wah Wu, Jun 12 2021

Examples

			1 = un -> 35 = trente-cinq -> 125 -> cent vingt cinq = 157.
		

Crossrefs

Programs

  • Mathematica
    a[1]=1;a[n_]:=a[n]=Total@LetterNumber@StringDelete[IntegerName[a[n-1],"French"],{" ","-"}];Array[a,100] (* Giorgos Kalogeropoulos, Jun 11 2021 *)
  • Python
    from num2words import num2words
    from unidecode import unidecode
    A344013_list = [1]
    for _ in range(10):
        A344013_list.append(sum(ord(s)-96 for s in unidecode(num2words(A344013_list[-1],lang='fr')) if s.isalpha())) # Chai Wah Wu, Jun 11 2021

Extensions

More terms from Chai Wah Wu, Jun 11 2021
Showing 1-2 of 2 results.