Наименьшее целое число, большее или равное гармонический ряд входных

Question

я работаю над следующей проблемой:

Я понимаю, что мой код откусил, но я хочу, чтобы создать цикл, который определит, будет ли целое число x (входное значение) не меньше или равно сумме гармонического ряда.

Вот то, что я до сих пор:

function n =one_per_n(x) 
if x > 10000 
    n = -1; 
end 
total = 0; 
i = 0; 
for i = 1:10000 
     if x >= total 
      n = ceil(total); 
     else 
      total = (1/i) + total; 


    end 


    end 

Я добавил свою попытку на время цикла. Я понимаю, что это неправильно, но любая помощь будет оценена по достоинству.

function n =one_per_n(x) 
if x > 10000 
    n = -1; 
end 
total = 0; 
i = 0; 
for i = 1:10000 
     while total <= x 
      total = (1/i) + total; 
    end 
    end 

n = total;

Answer 1

Некоторое время цикла является лучшим вариантом в этом случае я думаю, что

function [total, n] = one_per_n(x) 
% This is a good initial check, good work 
if x > 10000 
    n = -1; 
    return; 
end 

% Initialize the variables 
total = 0; 
n = 0; 

% While not finished 
while (total < x) 
    % Number of terms 
    n = n + 1; 
    total = total + 1/n; 
end 

end 

Answer 2

вам не нужно использовать несколько петель:

function n = one_per_n(x) 
lim = min(10000,exp(x)); 
value = cumsum(1./(1:lim)); 
n  = find(value >= x,1); 
if isempty(n) 
    n = -1; 
end