Poprzedni ciąg poleceń możemy zapisać do pliku z rozszerzeniem \m" zwanym ‘script M-plikiem’ (będą jeszcze pliki z takim samym rozszerzeniem zawierające opis (treść) funkcji), nazwijmy go lfib.m:
%lfib
losowy ciąg Fibonacci;
rand('state', 100) % nadanie wart. paramet. State;
m = 1000; % liczba iteracji;
x = (1 2]; % warunki początkowe;
for n = 2:m-l % pętla główna;
x(n+l) = x(n) + sign(rand-0.5)*x(n-1); end
semilogy(1:m,abs(x)) c = 1.13198824; % stała Visvanath'a
hołd on
semilogy(1: m, c.A [ 1: m]) hołd off
title('Losowy ciąg Fibonacciego')
Matiab 23/1)91
(Politechnika Gdańska)