fid = file ('open','D:\Documents and Settings\ravano\Pulpit\scilabb\dane2.txt','unknown'); //dane = read (fid, -1, 2); dane = read (fid, -1, 2); //----------------------------------------------------------------- //HISTOGRAM G=[2250;2300;2350;2400;2450;2500;2550] //clf; H=[dane(:,2)] Min=2250; for i=1:7, A(i)=0; for j=1:100, if (H(j)>Min & H(j)<=Min+50) then,A(i)=A(i)+1;end, end, Min=Min+50; end clf; plot2d(G,A, style=2); title(' Lamana czestosci dla 10 pomiarow'); xlabel(' Klasy'); ylabel(' Czestosc wystepowania ');