A104960 Primes from merging of 4 successive digits in decimal expansion of cos(1).

3023, 8681, 6607, 4297, 6037, 2767, 5381, 3947, 6451, 4517, 5179, 7951, 3089, 9343, 4357, 3571, 5717, 6337, 1663, 5417, 7949, 2543, 3359, 3517, 7573, 1543, 4327, 7549, 5449, 1151, 2273, 7823, 3677, 6899, 7873, 3067, 4507, 5077, 8161, 5851, 6329, 2729

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

The first 15,000 digits of Cos(1) as calculated by Simon Plouffe at WorldWideSchool.org.

Mathematica

 Select[FromDigits/@Partition[RealDigits[Cos[1], 10, 500][[1]], 4, 1], PrimeQ[#]&&#>1000&] (* Vincenzo Librandi, Apr 24 2013 *)

Crossrefs

Sequence in context: A186394 A236200 A252620 * A255736 A231762 A034600

Adjacent sequences: A104957 A104958 A104959 * A104961 A104962 A104963

Keyword

nonn,base

Author

Andrew G. West (WestA(AT)wlu.edu), Mar 30 2005

Extensions

Offset changed from 0 to 1 by Vincenzo Librandi, Apr 24 2013

Status

approved