login
A176273
Partial sums of A036967.
1
1, 17, 49, 113, 194, 322, 565, 821, 1333, 1958, 2687, 3711, 5007, 7055, 9242, 11643, 14235, 17360, 21248, 25344, 30528, 37089, 44865, 53057, 63057, 73425, 85089, 99730, 115282, 130907, 147291, 164098, 183781, 203781, 224517, 247845, 276406
OFFSET
1,2
LINKS
FORMULA
a(n) = Sum_{i=1..n} A036967(i).
EXAMPLE
a(11) = 1 + 16 + 32 + 64 + 81 + 128 + 243 + 256 + 512 + 625 + 729 = 2687.
MATHEMATICA
Accumulate @ Select[Range[25000], # == 1 || Min[FactorInteger[#][[;; , 2]]] > 3 &] (* Amiram Eldar, Feb 07 2023 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Apr 14 2010
STATUS
approved