代码搜索结果
找到约 10,000 项符合
R 的代码
r4.in
&pltpar isep=0, itx=2, vred=0.,
imod=1, iray=1, ibnd=0, isum=2,
xwndow=290., ywndow=175.,
ibcol=0, ifcol=1, ircol=1, itcol=1,
&end
&axepar xmax=10., xmm=270.,
r5.in
&pltpar isep=2, itx=3, itxout=0, idata=1, vred=0.,
imod=1, iray=1, ibnd=0,
xwndow=290., ywndow=175.,
ircol=3, itcol=3,
&end
&axepar xmax=10., xmm=270.,
r7.in
&pltpar isep=2, iplot=1, ibnd=0, vred=7., xwndow=290., ywndow=175.,
iroute=1, iseg=0, ivel=0, nrskip=1, isum=3, idump=0, iszero=0,
modout=0,dxmod=5.,dzmod=0.10,modi=1,2,0,0,xmmin
r3.in
&pltpar isep=0, itx=3, idata=1, vred=0.,
imod=1, iray=2, ibnd=0, isum=2,
xwndow=292., ywndow=175.,
ircol=1, itcol=1,
&end
&axepar xmax=10., xmm=265.,
r8.in
&pltpar isep=0, itx=1, idata=0,
imod=1, iray=2, irayps=1, ibnd=0,
xwndow=292., ywndow=175.,
&end
&axepar xmax=300., xmm=265.,
zmax=40., zmm=60.,
r1.in
&pltpar isep=0, itx=3, idata=1,
imod=1, iray=2, ibnd=0, isum=2,
xwndow=292., ywndow=175.,
ircol=1, itcol=1,
&end
&axepar xmax=300., xmm=265.,
zmax=
r.m
function <mark>r</mark> = <mark>r</mark>(ke<mark>r</mark>nel)
% <mark>R</mark>
%
% This method <mark>r</mark>etu<mark>r</mark>ns an uppe<mark>r</mark> bound on
%
% <mark>R</mark> > k(x1, x1) - k(x1, x2)
%
% fo<mark>r</mark> a<mark>r</mark>bit<mark>r</mark>a<mark>r</mark>y x1 and x2. Fo<mark>r</mark> a Gaussian <mark>r</mark>adial basis ke<mark>r</mark>nel <mark>R</mark> = 1.
%
% File ...
r.m
%计算自相关
function r=R(N,x,T) %N is the data number,T is the time delay
r=sum(x((T+1):N).*x(1:(N-T)))/N;
r.m
%
% routine to get the square root of a number
%
% usage: via tree structured GA
%
function out = r(x)
%
%
out=sqrt(abs(x));