A = load('marketcap.csv'); %nalozimo podatke

C = sum(A(:,4:end),2); %trzna kapitalizacija (skupaj) po dnevih
m = length(C);

I = zeros(1,m); %prostor za vrednosti indeksa po dnevih
I(1) = 1000; %vrednost indeksa prvi dan
I_gor = I;
I_dol = I;
I_round = I;

for d = 2:m
    r = C(d)/C(d-1);
    I(d) = r*I(d-1);
    I_gor(d) = zaokrozi(r,3,"navzgor")*I_gor(d-1);
    I_dol(d) = zaokrozi(r,3,"navzdol")*I_dol(d-1);
    I_round(d) = zaokrozi(r,3)*I_round(d-1);
end

clf % pobrise, kar je bilo prej
hold on % drzi vse narisano na platnu
plot(1:m,I);
plot(1:m,I_gor);
plot(1:m,I_dol);
plot(1:m,I_round);
hold off
legend('borzni indeks', 'indeks z zaokrozevanjem navzgor', ...
    'indeks z zaokrozevanjem navzdol', 'indeks s korektnim zaokrozevanjem');