login
A103810
Primes from merging of 4 successive digits in decimal expansion of the Golden Ratio, (1+sqrt(5))/2.
24
9887, 6563, 8117, 7207, 9391, 3911, 8807, 8689, 2663, 5443, 3389, 5939, 6131, 1319, 2087, 6689, 2221, 6269, 2963, 9631, 1361, 2203, 4547, 9241, 3449, 8467, 7433, 4339, 4877, 7499, 9887, 4007, 6521, 7057, 7517, 5179, 7883, 7589, 7621, 6217, 1117, 1777
OFFSET
1,1
COMMENTS
Leading zeros are not permitted, so each term is 4 digits in length. - Harvey P. Dale, Oct 23 2011
LINKS
Simon Plouffe, Expansion of the Golden Ratio done to 20,000 digits as part of project Gutenberg.
Eric Weisstein's World of Mathematics, Golden Ratio.
MATHEMATICA
With[{len=4}, FromDigits/@Select[Partition[RealDigits[GoldenRatio, 10, 1000][[1]], len, 1], PrimeQ[FromDigits[#]] && IntegerLength[ FromDigits[#]] == len&]] (* Harvey P. Dale, Oct 23 2011 *)
CROSSREFS
Cf. A001622.
Sequence in context: A208646 A001230 A238076 * A277944 A237917 A205612
KEYWORD
nonn,base
AUTHOR
Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
EXTENSIONS
Offset changed from 0 to 1 by Vincenzo Librandi, Apr 22 2013
STATUS
approved