function mod_data=mod_8psk(bin_data) if rem(length(bin_data),3)~=0 error('the length of the data is wrong'); else mat…
S29NS-J 源代码
汇集 S29NS-J 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
function r=exchange2(R) N=length(R); I=1+fix(unifrnd(0,N)); J=1+fix(unifrnd(0,N-1)); if I==J J=J+1; end if J
function r=exchange2(R) N=length(R); I=1+fix(unifrnd(0,N)); J=1+fix(unifrnd(0,N-1)); if I==J J=J+1; end if J
function f=gm3(x) n=length(x); z(n-3,n)=0;% zz(n-2,n)=0; AB=zeros(2,n-3); for j=1:n-3 z(j,j:n)=x(j:n); x1=zero…
function f=gm4(x,K) n=length(x); z(n-3,n)=0; zz(n-2,n)=0;% AB=zeros(2,n-3); for j=1:n-3 z(j,j:n)=x(j:n); x1=…
function r=exchange2(R) N=length(R); I=1+fix(unifrnd(0,N)); J=1+fix(unifrnd(0,N-1)); if I==J J=J+1; end if J
function r=exchange2(R) N=length(R); I=1+fix(unifrnd(0,N)); J=1+fix(unifrnd(0,N-1)); if I==J J=J+1; end if J
function r=exchange2(R) N=length(R); I=1+fix(unifrnd(0,N)); J=1+fix(unifrnd(0,N-1)); if I==J J=J+1; end if J
function r=exchange2(R) N=length(R); I=1+fix(unifrnd(0,N)); J=1+fix(unifrnd(0,N-1)); if I==J J=J+1; end if J
var i,j; begin i := 85; j := 51; repeat if i > j then i := i-j else j := j-i until i = j ; write(i…