|
|
A104958
|
|
Primes from merging of 2 successive digits in decimal expansion of cos(1).
|
|
2
|
|
|
23, 13, 97, 71, 17, 29, 97, 37, 73, 23, 31, 61, 17, 79, 67, 97, 53, 11, 47, 47, 71, 17, 17, 79, 71, 83, 89, 43, 71, 17, 73, 31, 11, 89, 97, 37, 41, 17, 73, 31, 47, 71, 17, 79, 97, 71, 11, 47, 47, 79, 23, 31, 11, 17, 79, 13, 43, 59, 43, 17, 67, 89, 59, 37, 73, 61, 43, 41, 17
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Leading zeros are not permitted, i.e., all terms must be two digits in length. - Harvey P. Dale, Apr 20 2012
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[FromDigits/@Partition[RealDigits[Cos[1], 10, 400][[1]], 2, 1], PrimeQ[#]&&#>9&] (* Harvey P. Dale, Apr 20 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Andrew G. West (WestA(AT)wlu.edu), Mar 30 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|