A375606 - OEIS

%I #12 Sep 15 2024 20:22:45

%S 1,2,3,4,5,7,9,11,14,17,20,23,27,31,35,40,45,50,55,61,67,73,80,87,94,

%T 102,110,118,126,135,144,153,163,173,183,193,204,215,226,238,250,262,

%U 275,288,301,314,328,342,356,371,386,401,417,433,449,465,482,499,516

%N a(1) = 1; a(n+1) = a(n) + floor(harmonic mean of previous terms).

%H James C. McMahon, <a href="/A375606/b375606.txt">Table of n, a(n) for n = 1..10000</a>

%e a(6) = 5 + floor(harmonic mean(1,2,3,4,5)) = 5 + floor(300/137) = 7.

%t Nest[Append[#,Last[#]+Floor@HarmonicMean[#]]&,{1},58]

%Y Cf. A065094, A114829.

%K nonn

%O 1,2

%A _James C. McMahon_, Aug 20 2024