OFFSET
1,1
FORMULA
a(n) = 3*A129926(n)-2. [R. J. Mathar, Apr 22 2010]
MATHEMATICA
3*Select[Range[600], PrimeOmega[#]==2&&PrimeQ[3#-2]&]-2 (* James C. McMahon, Feb 02 2025 *)
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Giovanni Teofilatto, Jun 06 2007
EXTENSIONS
Extended by R. J. Mathar, Apr 22 2010
STATUS
approved