OFFSET
1,1
FORMULA
a(n) = 4*A016031(n). - Paolo P. Lava, Nov 10 2006
EXAMPLE
k=5: 2^5/(5-1) = 32/4 = 8.
k=17: 2^17/(17-1) = 131072/16 = 8192.
MAPLE
P:=proc(n) local i, j; for i from 2 by 1 to n do j:=2^i/(i-1); if trunc(j)=j then print(j); fi; od; end: P(5000);
MATHEMATICA
f[n_]:=2^n/n*2; Select[Table[f[n], {n, 4, 6!}], IntegerQ] (* Vladimir Joseph Stephan Orlovsky, Dec 05 2009 *)
Select[Table[2^n/(n-1), {n, 2, 500}], IntegerQ] (* Harvey P. Dale, Sep 27 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Paolo P. Lava and Giorgio Balzarotti, May 11 2006
STATUS
approved