%%计算距离
for i=1:length(test_data)
y(i,:) = test_data(i,:);
r = distance(y(i,:),train_data);%r是计算球面距离的函数
end
r_data=r(:);
%%滤波器权重
RR = find(r<200);
RR_data = r_data(RR);
for i=1:length(RR_data);
W(i,:)=exp(-((RR_data(i,:)/Rp)^2)*a) - exp(-a);
end