03.m

来自「BAM是一种两层的异联想」· M 代码 · 共 34 行

n=9;%微数
A1=sign(randn(1,n));
A2=sign(randn(1,n));
A3=sign(randn(1,n));
B1=sign(randn(1,n));
B2=sign(randn(1,n));
B3=sign(randn(1,n));

%转换极性
x1=shuang(A1);
x2=shuang(A2);
x3=shuang(A3);
y1=shuang(B1);
y2=shuang(B2);
y3=shuang(B3);
x=[x1;x2;x3];
y=[y1;y2;y3];

%求权矩阵
W=x'*y;%用公式求
W1=2*x1'*y1+2*x2'*y2+1*x3'*y3;%加入系数

%联想
beta=sign(x2*W);
alfa=sign(beta*W');
beta1=sign(x2*W1);
alfa1=sign(beta1*W1');

%验证是否相等
a=beta-y2;
b=alfa-x2;
a1=beta1-y2;
b1=alfa1-x2;
c=[a;b;a1;b1]