[go: up one dir, main page]

login
A287882
a(n) = Sum_{ i <= n, i squarefree} A080670(i).
3
1, 3, 6, 6, 11, 34, 41, 41, 41, 66, 77, 77, 90, 117, 152, 152, 169, 169, 188, 188, 225, 436, 459, 459, 459, 672, 672, 672, 701, 936, 967, 967, 1278, 1495, 1552, 1552, 1589, 1808, 2121, 2121, 2162, 2399, 2442, 2442, 2442, 2665, 2712, 2712, 2712, 2712, 3029, 3029, 3082, 3082, 3593, 3593, 3912
OFFSET
1,2
COMMENTS
A lower bound on A287881.
LINKS
MATHEMATICA
A080670 = Cases[Import["https://oeis.org/A080670/b080670.txt", "Table"], {_, _}][[All, 2]];
Accumulate[Table[If[SquareFreeQ[n], A080670[[n]], 0], {n, 57}] ] (* Robert Price, Mar 16 2020 *)
CROSSREFS
Sequence in context: A200534 A138743 A184284 * A066297 A160713 A279625
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jun 19 2017
STATUS
approved