login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A104963
Primes from merging of 7 successive digits in decimal expansion of cos(1).
1
3058681, 7174009, 6074429, 9766037, 4206179, 7922227, 7744717, 4517951, 9343571, 9245513, 3932543, 5943517, 3757361, 4327549, 1754491, 7511513, 2227301, 3135707, 2322367, 2236771, 7873067, 4067587, 5111563, 7145689
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, 600][[1]], 7, 1], IntegerLength[#] == 7 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 25 2013 *)
CROSSREFS
Sequence in context: A281447 A246249 A183696 * A190462 A282746 A212854
KEYWORD
nonn,base
AUTHOR
Andrew G. West (WestA(AT)wlu.edu), Mar 30 2005
EXTENSIONS
Changed offset from 0 to 1 by Vincenzo Librandi, Apr 24 2013
STATUS
approved