A013189 All terms are squares and a(n) is length of n-th run.

1, 4, 4, 4, 4, 9, 9, 9, 9, 16, 16, 16, 16, 25, 25, 25, 25, 36, 36, 36, 36, 36, 36, 36, 36, 36, 49, 49, 49, 49, 49, 49, 49, 49, 49, 64, 64, 64, 64, 64, 64, 64, 64, 64, 81, 81, 81, 81, 81, 81, 81, 81, 81, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100

Offset

1,2

Comments

Golomb's sequence using squares. - Benoit Cloitre, Apr 20 2003

Links

Ivan Neretin, Table of n, a(n) for n = 1..10000

Formula

n-th term, divided by n, tends to square root of two.

Mathematica

f[s_] := Join@@Table[i^2, {i, Length[s]}, {s[[i]]}]; Nest[f, {1, 4}, 3]

Crossrefs

Cf. A001462, A080605, A080606, A080607.

Sequence in context: A124570 A213083 A053187 * A295643 A190718 A035621

Adjacent sequences: A013186 A013187 A013188 * A013190 A013191 A013192

Keyword

nonn,easy

Author

James Propp

Status

approved