Numerical Analysis in program in Matlab or Maple is not working

[Shaharyar]

Respected members,

I am student of MS Mathematics and recently started working on my research, but I am having some problems while working in Matlab and Maple for its execution .
what I require is Algoritham of Atiken and Weigsten method in Maple or Matlab programe should made, that execute after chaning the values of X0 and F(X).The prgoram is
syms x; atiken(0.5*(cos(x)+3),1.5)
function[R]=atiken(f,x1)
format long
y=inline(f);
x2=y(x1);
x3=y(x2);
delx1=x2-x1;
delx2=x3-x2;
del2x1=delx2-delx1;
R=x3-(delx2)^2/(del2x1);
en


and the error is

>> function[R]=atiken(f,x1)
format long
y=inline(f);
x2=y(x1);
x3=y(x2);
delx1=x2-x1;
delx2=x3-x2;
del2x1=delx2-delx1;
R=x3-(delx2)^2/(del2x1);
end
??? function[R]=atiken(f,x1)
|
Error: Function definitions are not permitted in this context.

>> syms x; atiken(0.5*(cos(x)+3),1.5)
function[R]=atiken(f,x1)
format long
y=inline(f);
x2=y(x1);
x3=y(x2);
delx1=x2-x1;
delx2=x3-x2;
del2x1=delx2-delx1;
R=x3-(delx2)^2/(del2x1);
end
??? Undefined function or method 'atiken' for input arguments of type 'sym'.

>>

need suggestions please.