A130148 a(1) = a(2) = 1. For n > 1, n is repeated (a(n)+a(n-1)) times.

1, 1, 2, 2, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14

Offset

1,3

Comments

Differs from A002024(n+1) from the first 8 on: there are only six "7", only seven "8", only eight "9" and "10" and "11" in the present sequence; from there on, n is repeated less than n-2 times. - M. F. Hasler, Feb 16 2014

Links

M. F. Hasler, Table of n, a(n) for n = 1..1965

Prog

(PARI) lista(nn) = {va = vector(nn, i, (i==1) || (i==2)); ipos = 3; n = 2; while ((ipos <= nn), nbr = va[n] + va[n-1]; while (nbr && (ipos <= nn), va[ipos] = n; ipos++; nbr--); n++; ); for (i=1, nn, print1(va[i], ", ")); } \\ Michel Marcus, Feb 17 2014
(PARI) a=[1, 1]; for(n=2, 20, a=concat(a, vector(a[n]+a[n-1], j, n)); a \\ M. F. Hasler, Feb 17 2014

Crossrefs

Cf. A001462.

Sequence in context: A087845 A130146 A113764 * A341510 A196238 A087843

Adjacent sequences: A130145 A130146 A130147 * A130149 A130150 A130151

Keyword

easy,nonn

Author

Leroy Quet, Aug 02 2007

Status

approved