OFFSET
1,1
FORMULA
a(n) = 5*A110482(n) - 6.
MATHEMATICA
Select[Prime[Range[13500]], IntegerQ[Sqrt[5#-6]]&]*5-6 (* James C. McMahon, Apr 20 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Sep 09 2005
EXTENSIONS
Corrected and extended by Ray Chandler, Sep 12 2005
STATUS
approved