OFFSET
1,1
FORMULA
a(n) = n*floor(2^n/n) = n*A000799(n).
a(n) = 2^n - (2^n mod n). - Chai Wah Wu, Aug 24 2023
MAPLE
a:=n->n*floor(2^n/n): seq(a(n), n=1..37); # Emeric Deutsch, Feb 16 2007
MATHEMATICA
f[n_] := n*Floor[2^n/n]; Array[f, 33] (* Ray Chandler, Feb 19 2007 *)
PROG
(Python)
def A128092(n): return (m:=1<<n)-(m%n) # Chai Wah Wu, Aug 24 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Feb 14 2007
EXTENSIONS
Extended by Emeric Deutsch and Ray Chandler, Feb 19 2007
STATUS
approved