Home > vbmeg > demo > test_scripts > sbi > fitGoFp.m

fitGoFp

PURPOSE

SYNOPSIS

function f=fitGoFp(p,p1,p2,x,bexp)

DESCRIPTION

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

CROSS-REFERENCE INFORMATION

This function calls:

vb_gradio vb_gradio : Rev.1.0, 2001-11-17

This function is called by:

SOURCE CODE

0001 function f=fitGoFp(p,p1,p2,x,bexp)
0002 %
0003 % Copyright (C) 2011, ATR All Rights Reserved.
0004 % License : New BSD License(see VBMEG_LICENSE.txt)
0005 
0006 b0=vb_gradio(p1(:,1:3),p2(:,1:3),x,p);
0007 bth=( b0(:,1).*p1(:,4) + b0(:,2).*p1(:,5) + b0(:,3).*p1(:,6) );
0008 
0009 f=sum((bexp-bth).^2)/sum(bexp.^2);