代码搜索结果

function [Hr,w,b,L]=Hr_Type1(h); M=length(h); L=(M-1)/2; a=[h(L+1) 2*h(L:-1:1)]; n=[0:L]; ww=[0:500]'*pi/500; Hr=cos(ww*n)*a';

function [Hr,w,b,L]=Hr_Type2(h); M=length(h); L=M/2; b=2*[h(L:-1:1)]; n=[1:L]; n=n-0.5; w=[0:500]'*pi/500; Hr=cos(w*n)*b';

clear all close all clc n=0:0.01:2; nfft=128; Fs=44; As=30; Ap=0.5; typeo=4; switch typeo case 1 type='bandpass'; case 2 type='stop'; case 3 type='high'; case 4 ty

clear all close all clc n=0:0.01:2; nfft=128; Fs=44; As=30; Ap=0.5; typeo=4; switch typeo case 1 type='bandpass'; case 2 type='stop'; case 3 type='high'; case 4 ty

clear all close all clc n=0:0.01:2; As=50; Ap=0.5; typeo=4; switch typeo case 1 type='bandpass'; case 2 type='stop'; case 3 type='high'; case 4 type='low'; end if ty

clc clear all close all T1=0.1095; T2=0.598; N=61; alpha=(N-1)/2; l=0:N-1;wl=(2*pi/N)*l; Hrs=[zeros(1,22),T1,T2,ones(1,14),T2,T1,zeros(1,21)]; Hdr=[0 0 1 1]; wdl=[0 0.75 0.75 1]; k1=0:floo

clc clear all close all T1=0.5925; T2=0.1399; N=36;%wpl=0.35pi,wph=0.65pi,wsl=0.25pi,wsh=0.75pi,Apl=2db,Aph=2db,Asl=20db,Ash=20db %k=N*w/2pi alpha=(N-1)/2; l=0:N-1; Hrs=[zeros(1,6),T

clc clear all close all T1=0.5925; T2=0.1399; N=36;%wpl=0.35pi,wph=0.65pi,wsl=0.25pi,wsh=0.75pi,Apl=2db,Aph=2db,Asl=20db,Ash=20db %k=N*w/2pi alpha=(N-1)/2; l=0:N-1; Hrs=[zeros(1,6),T

VERSION 5.00 '微带线-无色散效应 Private Sub cmdOK_Click() Dim pi As Double pi = 4 * Atn(1) If Frame2.Visible = True Then Text5.Text = "?" Dim w, h, t, er, ZO, ef, bz As Double w = Text1.Text h = Te

function [y]=Qfunct(x) % [y]=Qfunct(x) % y = 1/sqrt(2*pi) * integral from x to inf of exp(-t^2/2) dt. % y = (1/2) * erfc(x/sqrt(2)). y=(1/2)*erfc(x/sqrt(2));