Функции нахождения абсолютной и относительной погрешности

[Mr_VEPRb]

Доброго времени суток,написал часть программы:
roA = sum (abs(x-xt)/length(x))
roO = 100*roA/sum(x)/length(x);
,где x - значение вектора с некоторым отклонением, а xt - точное значение. Необходимо подобрать встроенные функции, которые выполняли бы те же действия. Поиски результатов не дали, надеюсь на Вашу помощь. Заранее большое спасибо

[jesusroyeth]

Служит ли вам это так? или вам нужно что-то более сложное?

Код: Выделить всё

function [roA,roO]=name(x,xt)
roA = sum2(abs2(x-xt)/length(x))
roO = 100*roA/sum2(x)/length(x);
end
function r=sum2(x)
r=0;
for k=1:length(x)
    r=r+x(k);
end
end 
function r=abs2(x)
if x>=0
    r=x;
else
    r=-x;
end
end

сохраните это в файле с именем "name", а затем вы можете запустить его так:
name(1:5,(1:5)+rand(1,5))

Jesús David Ariza Royeth