|
1, 8, 15, 57, 64, 106, 148, 400, 407, 449, 491, 743, 785, 1037, 1289, 2801, 2808, 2850, 2892, 3144, 3186, 3438, 3690, 5202, 5244, 5496, 5748, 7260, 7512, 9024, 10536, 19608, 19615, 19657, 19699, 19951, 19993, 20245, 20497, 22009, 22051, 22303, 22555, 24067
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
a[n_] := 7*6^(Total@ IntegerDigits[n - 1, 2] - 1); a[1] = 1; Accumulate@ Array[a, 44] (* Michael De Vlieger, Nov 01 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|