A176273 Partial sums of A036967.

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

Author

Jonathan Vos Post, Apr 14 2010

Keywords

• easy
• nonn

Examples

			a(11) = 1 + 16 + 32 + 64 + 81 + 128 + 243 + 256 + 512 + 625 + 729 = 2687.
		

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000583, A001694, A036966, A036967.

Programs

Mathematica

Accumulate @ Select[Range[25000], # == 1 || Min[FactorInteger[#][[;; , 2]]] > 3 &] (* Amiram Eldar, Feb 07 2023 *)

Formula

a(n) = Sum_{i=1..n} A036967(i).