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...
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
Offset: 1
Crossrefs
Cf. A169978.
Cf. A104057 (Same rule, but starting with 20). [From M. F. Hasler, Aug 18 2010]
Programs
-
End
-
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}
Extensions
Typo in sequence corrected by D. S. McNeil, Aug 18 2010
Extended beyond a(55) by M. F. Hasler, Aug 18 2010
Comments