OFFSET
1,3
COMMENTS
PROG
(PARI) {A=[0, 1, 2]; F=[1, 1]; for(n=0, 4, F=[F[2], vecsum(F)]; for(k=1, 3, T=max(k*10, 21)*10^n; A=concat(A, apply(t->t+T, A[F[2]-1+if(k>2, F*[2, -1]~)..vecsum(F)-2])))); A}
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Oct 05 2018
STATUS
approved