ker1.m

来自「patten regnization source从1-14章能运行」· M 代码 · 共 9 行

function ker=ker1(x); 
% the triangular kernel
%  INPUT:
%  x     size 1,n vector
%  OUTPUT:
%  ker   size 1,n vector
k=(1-abs(x));
ker=max(k,(zeros(1,length(x))));