A173418 Primes formed by the initial digits of the decimal expansion of 1/(Golden Ratio).

61, 61803398874989

Offset

1,1

Comments

The next term consists of the first 887 digits of 1/(Golden Ratio) and is too large to show here.

Links

Table of n, a(n) for n=1..2.

Eric Weisstein's World of Mathematics, Phi-Prime

Maple

Digits := 1000: n0 := evalf((sqrt(5)-1)/2): for i from 1 to 10000 do t1 := trunc(10^i*n0): if isprime(t1) then print(t1): fi: od:

Mathematica

With[{gr=RealDigits[1/GoldenRatio, 10, 1000][[1]]}, Select[Table[ FromDigits[ Take[ gr, n]], {n, 1000}], PrimeQ]] (* Harvey P. Dale, Oct 17 2012 *)

Crossrefs

Sequence in context: A093631 A087513 A176272 * A147667 A022084 A362452

Adjacent sequences: A173415 A173416 A173417 * A173419 A173420 A173421

Keyword

nonn,base,bref

Author

Michel Lagneau, Feb 17 2010

Status

approved