|
|
A104056
|
|
Each number is the rank in the alphabet of a letter (and "0" stands for a space). After substitution one reads (in English): "one five one four five zero six nine two two five zero ..." which is the succession of the digits of the sequence itself: 1 5 1 4 5 0 6 9 2 2 5 0...
|
|
3
|
|
|
15, 14, 5, 0, 6, 9, 22, 5, 0, 15, 14, 5, 0, 6, 15, 21, 18, 0, 6, 9, 22, 5, 0, 26, 5, 18, 15, 0, 19, 9, 24, 0, 14, 9, 14, 5, 0, 20, 23, 15, 0, 20, 23, 15, 0, 6, 9, 22, 5, 0, 26, 5, 18, 15, 0, 15, 14, 5, 0, 6, 9, 22, 5, 0, 15, 14, 5, 0, 6, 15, 21, 18, 0, 6, 9, 22, 5, 0, 26, 5, 18, 15, 0, 19, 9, 24
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The only other such sequence starts with: 20,23,15,0,26,5,18,15,0... (which reads "two zero...")
|
|
LINKS
|
|
|
PROG
|
(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. */
A104056(Nmin, a=[], pos=1)={ while( Nmin > #a=concat( a, concat( apply( digit2seq, eval( Vec( Str( if( #a, a[pos++ ], 15) )))))), ); a}
(End)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn,word
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|