OFFSET
1,1
COMMENTS
FORMULA
{prime(k) : A023506(k) is odd}. - R. J. Mathar, May 08 2009
MATHEMATICA
fQ[n_] := Mod[ Flatten[ FactorInteger[n - 1]] [[2]], 2] == 1; Select[ Prime@ Range@ 90, fQ@# &] (* Robert G. Wilson v, May 31 2009 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Shevelev, May 04 2009
EXTENSIONS
Edited by R. J. Mathar, May 08 2009
More terms from Robert G. Wilson v, May 31 2009
STATUS
approved