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

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

Author

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

Keywords

• nonn
• word

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

Cf. A073327, A169639, A345240, A345126, A345157.

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