reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
a(n) = sum( Sum_{k=1, ..n, } A003159(k) ).
Amiram Eldar, <a href="/A071994/b071994.txt">Table of n, a(n) for n = 1..10000</a>
a(n) ~ 3*n^2/4 + O(n*log(n)). - Amiram Eldar, Jan 16 2022
Accumulate @ Select[Range[100], EvenQ[IntegerExponent[#, 2]] &] (* Amiram Eldar, Jan 16 2022 *)
Cf. A003159.
approved
editing
_Benoit Cloitre (benoit7848c(AT)orange.fr), _, Jun 17 2002
easy,nonn,new
Benoit Cloitre (abmtbenoit7848c(AT)wanadooorange.fr), Jun 17 2002
easy,nonn,new
Benoit Cloitre (abcloitreabmt(AT)modulonetwanadoo.fr), Jun 17 2002
easy,nonn,new
Benoit Cloitre (abcloitre(AT)wanadoomodulonet.fr), Jun 17 2002
a(n) = sum( k=1, n, A003159(k) ).
1, 4, 8, 13, 20, 29, 40, 52, 65, 80, 96, 113, 132, 152, 173, 196, 221, 248, 276, 305, 336, 369, 404, 440, 477, 516, 557, 600, 644, 689, 736, 784, 833, 884, 936, 989, 1044, 1101, 1160, 1220, 1281, 1344, 1408, 1473, 1540, 1608, 1677, 1748, 1821, 1896, 1972, 2049
1,2
easy,nonn
Benoit Cloitre (abcloitre(AT)wanadoo.fr), Jun 17 2002
approved