login
A104959
Primes from merging of 3 successive digits in decimal expansion of cos(1).
1
139, 397, 971, 607, 373, 617, 179, 227, 811, 947, 179, 571, 173, 311, 337, 541, 173, 179, 797, 971, 479, 233, 331, 311, 179, 139, 433, 359, 757, 641, 449, 491, 751, 151, 131, 227, 631, 313, 823, 223, 367, 677, 401, 151, 593, 787, 227, 587, 617, 563, 571
OFFSET
1,1
LINKS
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]], 3, 1], PrimeQ[#]&&#>100&] (* Vincenzo Librandi, Apr 24 2013 *)
CROSSREFS
Sequence in context: A142019 A142099 A142680 * A265502 A142563 A142213
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