OFFSET
1,1
COMMENTS
N-th Early bird number A116700(n) is in the sequence if it occurs in the concatenation of the first n-1 early bird numbers, A116700(1), ..., A116700(n-1).
With A116700 as early bird numbers of order 1, this can be generalized to define early bird numbers of order k for k > 1: N-th Early bird number of order k-1 is an early bird number of order k if it occurs in the concatenation of the first n-1 early bird numbers of order k-1.
Inspired by Eric Angelini's posting to Seq Fan mailing list, Jul 23, 2007.
LINKS
Klaus Brockhaus, Table of n, a(n) for n = 1..1000
EXAMPLE
PROG
(JBASIC) Program works for order >= 1; set maxterm >= A133652(order).
order = 2
maxterm = 374 : dim seq(maxterm), early(maxterm)
for i = 1 to maxterm : seq(i) = i : next
for k = 1 to order
concatenation$ = "" : n = 0
for j = 1 to maxterm
term = seq(j) : string$ = str$(term)
if instr(concatenation$, string$) > 0 then n = n+1 : early(n) = term
concatenation$ = concatenation$ + string$
next j
maxterm = n : redim seq(maxterm)
for i = 1 to maxterm : seq(i) = early(i) : next
redim early(maxterm)
next k
print "early bird numbers of order "; order
for i = 1 to maxterm : print seq(i); ", "; : next
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Klaus Brockhaus, Sep 19 2007
STATUS
approved