A138722 Concatenation of p digits 1, p digits 0 and p digits 1, where p is the n-th prime.

110011, 111000111, 111110000011111, 111111100000001111111, 111111111110000000000011111111111, 111111111111100000000000001111111111111

Offset: 1

Author

Omar E. Pol, Mar 29 2008

Keywords

• base
• easy
• nonn

Crossrefs

Cf. A000040, A138149, A138721.

Programs

Mathematica

Table[FromDigits[Join[PadRight[{},n,1],PadRight[{},n,0],PadRight[{},n,1]]],{n,Prime[Range[7]]}] (* Harvey P. Dale, Feb 05 2017 *)