A304652 Digits of the Copeland-Erdős constant taken in groups of five digits.
23571, 35711, 57111, 71113, 11131, 11317, 13171, 31719, 17192, 71923, 19232, 92329, 23293, 32931, 29313, 93137, 31374, 13741, 37414, 74143, 41434, 14347, 43475, 34753, 47535, 75359, 53596, 35961, 59616, 96167, 61677, 16771, 67717, 77173, 71737, 17379, 73798, 37983, 79838, 98389
Offset: 1
Programs
-
Mathematica
numCopelandErdos = Flatten[IntegerDigits[Prime[Range[1000]]]]; Table[FromDigits[numCopelandErdos[[n ;; (n + 4)]]], {n, Length[numCopelandErdos] - 4}]
Comments