A104056 -id:A104056 - cp's OEIS frontend

A169978 The individual digits in A104056.

1, 5, 1, 4, 5, 0, 6, 9, 2, 2, 5, 0, 1, 5, 1, 4, 5, 0, 6, 1, 5, 2, 1, 1, 8, 0, 6, 9, 2, 2, 5, 0, 2, 6, 5, 1, 8, 1, 5, 0, 1, 9, 9, 2, 4, 0, 1, 4, 9, 1, 4, 5, 0, 2, 0, 2, 3, 1, 5, 0, 2, 0, 2, 3, 1, 5, 0, 6, 9, 2, 2, 5, 0, 2, 6, 5, 1, 8, 1, 5, 0

Offset: 1

N. J. A. Sloane, Aug 18 2010

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.

Original entry on oeis.org

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

Eric Angelini, Mar 02 2005

The only other such sequence starts with: 15 14 5 0 6 9 22 5 0... (which reads "one five...")

Cf. A169979, A104056, A104059.

/* 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}

Corrected a(52) from 6 to 9, and extended beyond a(69) by M. F. Hasler, Aug 18 2010

cp's OEIS Frontend

A169978 The individual digits in A104056.

Views

Author

Keywords

Views

Author

Keywords

Comments

Crossrefs

Programs

End

PARI

Extensions