|
| |
|
|
A103789
|
|
Primes from merging of 8 successive digits in decimal expansion of the Golden Ratio; (1+sqrt(5))/2.
|
|
27
| |
|
|
65638117, 18939113, 40880753, 33862223, 63544333, 59395829, 26613199, 26788067, 20876689, 62629631, 87012203, 85098743, 12544877, 66478091, 87124007, 70575179, 10427621, 77111777, 17141011, 71410117, 66979873
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
COMMENTS
| Leading zeroes are not permitted,so each term is 8 digits in length. [From Harvey P. Dale, Oct 23 2011]
|
|
|
LINKS
| The Golden Ratio as explained at MathWorld.com
Expansion of the Golden Ratio done to 20,000 digits as part of project Gutenberg.
|
|
|
MATHEMATICA
| Select[Select[FromDigits/@Partition[RealDigits[N[GoldenRatio, 1000]][[1]], 8, 1], PrimeQ], IntegerLength[#]==8&]
|
|
|
CROSSREFS
| Sequence in context: A164726 A183671 A204498 * A184215 A151697 A138085
Adjacent sequences: A103786 A103787 A103788 * A103790 A103791 A103792
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
|
|
|
EXTENSIONS
| Broken URL to Project Gutenberg replaced by Georg Fischer (Georg.Fischer(AT)T-Online.de), Jan 03 2009
Mathematica program provided by Harvey P. Dale, Dec. 4, 2010
|
| |
|
|
