A225140 Primes from merging of 10 successive digits in the decimal expansion of cos(1).

3058681397, 9366074429, 4297660373, 9518560871, 3089343571, 3185847179, 3254335943, 4964175449, 5449177511, 7823223677, 3677140151, 7587498161, 2968890571, 4423024093, 2302409359, 2434336217, 5694535157, 8251380499, 7306380317, 4450349861, 6335655779

Offset

1,1

Comments

Leading zeros are not permitted, so each prime is 10 digits in length. The terms are listed in the order in which they occur.

Links

Bruno Berselli, Table of n, a(n) for n = 1..1000

Simon Plouffe, Champernowne constant to 15000 digits

Mathematica

With[{len = 10}, FromDigits /@ Select[Partition[RealDigits[Cos[1], 10, 600][[1]], len, 1], PrimeQ[FromDigits[#]] && IntegerLength[FromDigits[#]] == len &]]

Crossrefs

Cf. A049470, A104958 - A104965.

Cf. A104966.

Sequence in context: A357461 A336966 A333127 * A203886 A257914 A257893

Adjacent sequences: A225137 A225138 A225139 * A225141 A225142 A225143

Keyword

nonn,base

Author

Bruno Berselli, Apr 30 2013

Status

approved