代码搜索结果
找到约 10,000 项符合
J 的代码
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
exchange3.m
function r=exchange3(R)
N=length(R);
K=fix(unifrnd(0,N));
J=fix(unifrnd(0,N-1));
I=fix(unifrnd(0,N-2));
if I==J
J=J+1;
end
if I==K
K=K+2;
end
if J==K
K=K+1;
end
if I>J
precess.c
/* Precession of the equinox and ecliptic
* from epoch Julian date J to or from J2000.0
*
* Program by Steve Moshier. */
#include "kep.h"
#if (DE200CD | DE200 | DE102 | SSYSTEM)
#define IAU 1
#e
rimm and imm.m
function rimm_imm() %交互式多模型 一维的情况(没有求出平均)
%对输入的x,p进行改动后的
%rimm rimm两者之间的比较
clear all;
close all;
timenum=100;
t=1;
transfer_matric=[0.98 0.02; %马尔科夫转移矩阵 矩阵为j行i列