function statisticke_grafy
a=cteniZeSouboru;
kresliGraf(a);
end
function a=cteniZeSouboru
b=fopen('data.txt','r');
a=fscanf(b,'%f');
fclose(b);
end
function kresliGraf(a)
subplot(2,3,1)
pie(a)
subplot(2,3,2)
ex=[1,1,1,1,1];
pie(a,ex,{'syr','salam','parky','sunka','ovoce'})
subplot(2,3,3)
[m,p]=max(a);
ex=zeros(1,length(a));
ex(p)=1;
pie(a,ex)
legend('syr','salam','parky','sunka','ovoce')
subplot(2,3,4)
pie3(a)
subplot(2,3,5)
pie3(a,ones(1,length(a)),{'syr','salam','parky','sunka','ovoce'})
subplot(2,3,6)
pie3(a,[0,1,0,1,0])
legend('syr','salam','parky','sunka','ovoce')
end
