A173397 Partial sums of A000019.
1, 2, 4, 6, 11, 15, 22, 29, 40, 49, 57, 63, 72, 76, 82, 104, 114, 118, 126, 130, 139, 143, 150, 155, 183, 190, 205, 219, 227, 231, 243, 250, 254, 256, 262, 284, 295, 299, 301, 309, 319, 323, 333, 337, 346, 348, 354, 358, 398, 407, 409, 412, 420, 424, 432, 441
Offset: 1
Keywords
Links
- Vaclav Kotesovec, Table of n, a(n) for n = 1..4095
Programs
-
Mathematica
Cases[Import["https://oeis.org/A000019/b000019.txt", "Table"], {, }][[All, 2]] // Accumulate (* Jean-François Alcover, Jan 03 2020 *)
Formula
a(n) = Sum_{i=1..n} A000019(i).
Comments