, ( ). ,
. , ( , )
, :
1. ( ) ( ):
c = [-5 4 -3 2 -1];
Sn = {'t' 't.^2 'sin(t)' 'cos(t)' 'exp(t)'};
2. :
t=0:0.1:0.4;
3. :
for i =1:5
s(i,:) = c(i)*eval(char(Sn(:,i)));
end
x=sum(s(1:5,:))
4. :
x= 1.0000 0.1253 -0.6973 -1.4657 -2.1780
, , e = [-1, 1]. .
,
,
, :
. n , , . , N . Ÿ , , . , [-1, 1] . , .
1.1. 4 % n =10, 0.4 % n =100 .. , n , 18 % .
![]() | ![]() |
1.1 ( )
n = 50; % m = 500; % . t = linspace(-1,1,m); V = ones(2*n+1,m); for k = -n: n V(k+n+1,:)=k*V(k+n+1,:); end for I = 1: m V(:,i)=t(i)*V(:,i); end E = exp(j*pi*V)'; c = symmst(-n: n)'; x = real(E*c)/sqrt(2); % x(t) | function c=symmst(n) %c(k)- ln = length(n); for i = 1: ln k = round(n(i)); c(i)= j*sqrt(2)*sin(pi*k/2)*... sinc(pi*k/2); end function s = sinc(x) if abs(x) < = 1e-12 s = 1; else s = sin(x)/x; end |
|
|
1- .
.
,
,
. , , 1
,
[-1,1]. [-1,1] ( 1.2, ).
![]() | ![]() | |
1.2 (-1,1) ; (0,1) | ||
t = 0:0.001:1.5; for n = 1: 10 y(n,:) = tcheb(n, t); end plot(t, y') % function y = tcheb(n, t) % y = tcheb(n,t) % T0 = ones(1,length(t)); T1 = t; | if n = = 0 y=T0; elseif n = = 1 y = T1; else for i =2: n T2 =2* t.*T1-T0; T0 = T1; T1 = T2; end y = T2; end | |
[0,1] - , , ( 1.3) . , :
.
1.3 n = 8 | ||
function f = mob(k, n, t) % f = mob(k, n, t) t1 = rem(t,1); m = length(t1); f = zeros(1,m); if k = = 0 return end if k > n error(['k>n->[k n]=['num2str(... [k n]) ']']) | else g1 = (k-1)/n; g2 = k/n; for i = 1:m if t1(i) >= g1 & t1(i) <= g2 f(i) = 1; end end end | |
[-1/2, 1/2]:
[ n /2] , n /2, p 0 1.
, [0, 1], 1.4. :
- k ;
- ;
- ,
,
;
- .
![]() | function w = wal(k,t) % w = wal(k,t) t1 = rem(t,1); t1(1)=t1(1)+3*eps; t1(end)=t1(end)-3*eps; w = ones(1,length(t1)); if k == 0 w = w; return end b = [dec2binvec(k) 0]; n = length(b); for i = 1: n-1 r = xor(b(i),b(i+1)); if r ~= 0 w=w.*Rdm(i, t1); end end function r = Rdm(i,t) r = sign(sin(2^I*pi*t)); |
;
:
. ,
.
![]() | ![]() |
1.5 n =1.. 10 ; | |
function L = Lagger(n, t, w) L = Lagger(n, t, w) % L0 = ones(1,length(t)); L1 = 1-t; if n = = 0 L = L0; elseif n = = 1 L = L1; else for i = 2:n L2=(2*i-1-t).*L1-(i-1)^2*L0; L0 = L1; L1 = L2; end L = L2; end | % % w if nargin = = 3 & w = = 'w' x = exp(-t/2); if n = = 0 | n = = 1 L = L.*x; else for i = 2: n x = x/i; L = L.*x; end end end |
|
|