OFFSET
1,3
COMMENTS
FORMULA
EXAMPLE
a(3) = 16 because A002496(3) = 17 and 1/17 = 0. 0588235294117647 0588235294117647 ... has period 16.
MATHEMATICA
lst={}; Do[If[PrimeQ[n^2+1], AppendTo[lst, n^2+1]], {n, 1, 1000}]; Table[Length[RealDigits[1/lst[[m]]][[1, 1]]], {m, 1, 60}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Sep 20 2014
STATUS
approved