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

Author

Felice Russo, Sep 10 2002

Keywords

• easy
• nonn
• base

Crossrefs

Cf. A020338.

Programs

Magma

[Seqint(Intseq(n) cat Intseq(n) cat Intseq(n)): n in [1..46]]; // Vincenzo Librandi, Feb 21 2014

Mathematica

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

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