%Graficos 
bdclose all;
close all; clear all; clc;
%set_param(0,'CharacterEncoding','ISO-8859-15');

amostras=4;

percentagem=linspace(0,0.2,16);
tic
for n_arranjos=2:3
    
    for n=1:size(percentagem,2)
        ones=combinations_total(amostras,n_arranjos,percentagem(n));
        
        %ones(1,1)
    
        if (ones(1,1)~=0)
            n_comb(n_arranjos,n)=size(ones,1);
        else
            n_comb(n_arranjos,n)=0;
        end
        
    end
    
end

toc
%%
clc;
close all;

%arranjo=2
hold on;
legend('combinações 2 a 2');
plot(percentagem,n_comb(2,:),'r');
%semilogy(percentagem,n_comb(2,:),'r')

%arranjo=3
hold on;
plot(percentagem,n_comb(3,:),'b');
%semilogy(percentagem,n_comb(3,:),'b');
legend('combinacoes 2 a 2','combinacoes 3 a 3');
xlabel('Parametro P'); ylabel('Quantidade de combinacoes');
%title('$\hat{a}$','Interpreter','latex')
grid on;
% %arranjo=4
% hold on;
% legend('combinações 4 a 4');
% plot(percentagem,n_comb(4,:),'k');
%%


semilogy(percentagem,n_comb(2,:),'r');
grid on; fs
hold on;
semilogy(percentagem,n_comb(3,:),'b');
legend('combinacoes 2 a 2','combinacoes 3 a 3');
xlabel('Parametro P'); ylabel('Combinacoes de F');
