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, 600][[1]], 7, 1], IntegerLength[#] == 7 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 25 2013 *)
CROSSREFS
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