用matlab求编写函数计算Fibonacci数组，求出该数组中第一个大于10000的元素。怎么写？

函数m文件Fibonacci.m：
function Fn=Fibonacci(n)
% Fibonacci用于计算Fibonacci数F(n)
% F(1)=F(2)=1 F(k)=F(K-1)+F(K-2)
if n<0||(n~=round(n))
n=0;
end

switch n
case 0
disp('输入错误！');
Fn=[];
case 1
Fn=1;
case 2
Fn=1;
otherwise
Fn1=1;
Fn2=1;
for k=3:n
Fn=Fn1+Fn2;
Fn1=Fn2;
Fn2=Fn;
end
end

end
百度上有。。。