A001389 - OEIS

A001389

To get the 6th term, for example, note that 5th term has three (10 in ternary!) 1's, one (1) 0, etc., giving 10 1 1 0 1 2 2 1 1 2.

2, 12, 1112, 10112, 11102112, 10110122112, 1110211011222112, 10110122110211022112, 1110211011222110122110222112, 10110122110211022110112221101022112, 11102110112221101221102221102110221101110222112

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

John Cerkan, Table of n, a(n) for n = 1..22

MATHEMATICA

a[1]=2; a[n_] := a[n] = FromDigits@ Flatten@ Table[ {IntegerDigits[ Length[e], 3], e[[1]]}, {e, Split[ IntegerDigits[ a[n - 1]]]}]; Array[a, 11] (* Giovanni Resta, Mar 25 2017 *)

CROSSREFS

Cf. A001388.

Sequence in context: A112512 A006751 A023989 * A022914 A177361 A138486

Adjacent sequences: A001386 A001387 A001388 * A001390 A001391 A001392

KEYWORD

nonn,base

AUTHOR

N. J. A. Sloane, Thomas L. York

EXTENSIONS

More terms from Sean A. Irvine, Jul 04 2012

STATUS

approved