|
3, 7, 11, 21, 25, 35, 45, 73, 77, 87, 97, 125, 135, 163, 191, 273, 277, 287, 297, 325, 335, 363, 391, 473, 483, 511, 539, 621, 649, 731, 813, 1057, 1061, 1071, 1081, 1109, 1119, 1147, 1175, 1257, 1267, 1295, 1323, 1405, 1433, 1515, 1597, 1841, 1851, 1879, 1907
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
A151923list[nmax_]:=Accumulate[3^DigitCount[Range[0, nmax], 2, 1]+1]+1; A151923list[100] (* Paolo Xausa, Jul 28 2023 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|