collatz_max_values

% kiszámolja collatz-ot 1..n bementekre és kirajzolja
% a maximum értékeit az egyes bementeknek
% bement:
    % n - 1 töl n ig kiszámolja a collatz-ot (collatz n szer fut le)
% kimenet:
    % x - egy tömb ami az egyes collatz hívás maximálisan felvett értékeit tartalmazza

function x = collatz_max_values(n)

max_array=zeros(1,1);
for i=1:n
  max_array(i)=coll(i);
end
xx=1:length(max_array);
plot(xx,max_array,'b*')
end

function maximum = coll(n)

yy=zeros(1,1);
yy(1)=n;
i=1;

while ( n ~= 1 );
  i=i+1;
  if ( mod(n,2) == 0 );
    n=n/2;
  else ( mod(n,2) == 1 );
    n=3*n+1;
  end
  yy(i)=n;
end
maximum=max(yy);

end