[go: up one dir, main page]

login
A214651
Count down from n to 1, n times.
1
1, 2, 1, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 6, 5
OFFSET
1,2
COMMENTS
This sequence contains every positive integer infinitely often.
This is a fractal sequence. Striking out the first instance of every term produces 1, 2, 1, 2, 1, 3, 2, 1, 3, 2, 1, 3, ..., which is the same as the original sequence, as far as it goes.
LINKS
Eric Weisstein's World of Mathematics, Positive Integer
Wikipedia, Fractal sequence
EXAMPLE
1;
2, 1, 2, 1;
3, 2, 1, 3, 2, 1, 3, 2, 1;
...
MATHEMATICA
f[n_] := Table[Range[n, 1, -1], {n}]; Flatten@Array[f, 6] (* Wesolowski *)
Flatten[Table[Table[Range[n, 1, -1], {n}], {n, 6}]] (* Alonso del Arte, Jul 24 2012 *)
CROSSREFS
Cf. A056520 (locations of new values), A060432 (locations of 1's).
Cf. A000290 (row lengths), A002411 (row sums), A036740 (row products).
Sequence in context: A123400 A232502 A288738 * A196059 A272900 A023116
KEYWORD
easy,nonn,tabf
AUTHOR
STATUS
approved