# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a103597
Showing 1-1 of 1

%I A103597 #12 Mar 27 2019 19:12:49
%S A103597 1,1,2,2,3,5,7,13,25,59,170,644,3402,27178,361139,8947437,474314304
%N A103597 Smallest number m such that Sum_{k=1..m} 1/prime(k) >= n/5.
%C A103597 a(18) > 5*10^10. - _Robert Price_, Dec 10 2013
%t A103597 Table[m = 1; s = 0; While[(s = s + 1/Prime[m]) < n/5, m++];
%t A103597 m, {n, 1, 17}] (* _Robert Price_, Mar 27 2019 *)
%Y A103597 Cf. A016088, A046024, A103591-A103600.
%K A103597 nonn
%O A103597 1,3
%A A103597 _James R. Buddenhagen_, Mar 28 2005
%E A103597 a(2)-a(3) and a(16)-a(17) from _Robert Price_, Dec 10 2013

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE