OFFSET
0,2
FORMULA
a(n) = 2^(n+1) - A001316(n). - R. J. Mathar, Oct 30 2009
EXAMPLE
a(3) = 12 = (1 + 5 + 5 + 1).
MATHEMATICA
a[n_] := 2^(n+1) - 2^DigitCount[n, 2, 1]; Array[a, 31, 0] (* Amiram Eldar, Aug 01 2023 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Gary W. Adamson, Oct 14 2009
EXTENSIONS
Extended by R. J. Mathar, Oct 30 2009
STATUS
approved