login
A104057
Each number is the rank in the alphabet of a letter (and "0" stands for a space). After substitution one reads (in English): "two zero two three one five zero two six five one eight one five zero ..." which is the succession of the digits of the sequence itself: 2 0 2 3 1 5 0 2 6 5 1 8 1 5 0.
3
20, 23, 15, 0, 26, 5, 18, 15, 0, 20, 23, 15, 0, 20, 8, 18, 5, 5, 0, 15, 14, 5, 0, 6, 9, 22, 5, 0, 26, 5, 18, 15, 0, 20, 23, 15, 0, 19, 9, 24, 0, 6, 9, 22, 5, 0, 15, 14, 5, 0, 5, 9, 7, 8, 20, 0, 15, 14, 5, 0, 6, 9, 22, 5, 0, 26, 5, 18, 15, 0, 20, 23, 15, 0, 26, 5, 18, 15, 0, 20, 23, 15, 0, 20, 8
OFFSET
1,1
COMMENTS
The only other such sequence starts with: 15 14 5 0 6 9 22 5 0... (which reads "one five...")
PROG
Contribution from M. F. Hasler, Aug 18 2010: (Start)
(PARI) /* helper function */
digit2seq(d) = { concat( apply( x->bitand(x, -97), Vec( Vecsmall( Str( [zero, one, two, three, four, five, six, seven, eight, nine][d+1])))), 0) }
/* compute this sequence to at least Nmin terms. */
A104057(Nmin, a=[], pos=1)={ while( Nmin > #a=concat( a, concat( apply( digit2seq, eval( Vec( Str( if( #a, a[pos++ ], 20) )))))), ); a}
(End)
CROSSREFS
KEYWORD
base,easy,nonn,word
AUTHOR
Eric Angelini, Mar 02 2005
EXTENSIONS
Corrected a(52) from 6 to 9, and extended beyond a(69) by M. F. Hasler, Aug 18 2010
STATUS
approved