OFFSET
1,1
EXAMPLE
634 is a term since 634 = 2*317, 2*634 - 1 = 1267 = 7*181, 4*634 - 3 = 2533 = 17*149, 8*634 - 7 = 5065 = 5*1013, 16*634 = 10129 = 7*1447, and 32*634 = 20257 = 47*431.
MATHEMATICA
f[n_]:=Last/@FactorInteger[n]=={1, 1}; lst={}; Do[If[f[n]&&f[2*n-1]&&f[4*n-3]&&f[8*n-7]&&f[16*n-15]&&f[32*n-31], AppendTo[lst, n]], {n, 0, 9!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, May 04 2010
STATUS
approved