A074842 Triplets: base 10 representation is the juxtaposition of three identical strings.

111, 222, 333, 444, 555, 666, 777, 888, 999, 101010, 111111, 121212, 131313, 141414, 151515, 161616, 171717, 181818, 191919, 202020, 212121, 222222, 232323, 242424, 252525, 262626, 272727, 282828, 292929, 303030, 313131, 323232, 333333

Offset

1,1

Links

Table of n, a(n) for n=1..33.

Mathematica

Table[FromDigits[Flatten[IntegerDigits/@PadRight[{}, 3, n]]], {n, 40}] (* Harvey P. Dale, Aug 10 2019 *)

Prog

(UBASIC)
10 cls
30 for I=1 to 100
40 A=str(I)
50 C=A+A+A
60 B=val(cutspc(C))
80 print B
90 next
100 end
(Magma) [Seqint(Intseq(n) cat Intseq(n) cat Intseq(n)): n in [1..46]]; // Vincenzo Librandi, Feb 21 2014

Crossrefs

Cf. A020338.

Sequence in context: A333568 A123673 A177769 * A180115 A082941 A029486

Adjacent sequences: A074839 A074840 A074841 * A074843 A074844 A074845

Keyword

easy,nonn,base

Author

Felice Russo, Sep 10 2002

Status

approved