48 lines
1.2 KiB
Mathematica
48 lines
1.2 KiB
Mathematica
|
function F = int(f,x,from,to)
|
||
|
|
% INT Integration of polynomial SDPVAR object
|
||
|
|
%
|
||
|
|
% F = int(f) Integrate w.r.t first variable
|
||
|
|
% F = int(f,x) Integrate w.r.t x
|
||
|
|
% F = int(f,x,u,v) Integrate w.r.t x from u to v
|
||
|
|
%
|
||
|
|
% sdpvar x1 x2
|
||
|
|
% p = 4*x1^4 + x1*x2;
|
||
|
|
% int(p) returns 0.25*x1^2*x2^2+0.8*x1^5*x2
|
||
|
|
% int(p,[x1 x2]) returns 0.25*x1^2*x2^2+0.8*x1^5*x2
|
||
|
|
% int(p,x1) returns 0.8*x1^5 + 0.5x1^2*x2
|
||
|
|
% sdpvar s t
|
||
|
|
% int(p,[x1],s,t) returns 0.8*t^5-0.8*s^5+0.5*x2*t^2-0.5*x2*s^2
|
||
|
|
% int(p,[x1 x2],[0 0],[1 1]) returns 1.05
|
||
|
|
% int(p,[x2],[0],[2]) returns 2*x1+8*x1^4
|
||
|
|
%
|
||
|
|
% See also JACOBIAN, HESSIAN, SDISPLAY
|
||
|
|
|
||
|
|
if nargin < 2
|
||
|
|
xi = depends(f);
|
||
|
|
x = recover(xi);
|
||
|
|
end
|
||
|
|
|
||
|
|
if nargin < 3
|
||
|
|
from = zeros(length(x),1);
|
||
|
|
end
|
||
|
|
|
||
|
|
if nargin < 4
|
||
|
|
to = x;
|
||
|
|
end
|
||
|
|
|
||
|
|
if length(from)==1 && length(x) > 1
|
||
|
|
from = repmat(from,length(x),1);
|
||
|
|
elseif length(from) ~= length(x)
|
||
|
|
error('The lower integration bound is inconsistent with the integrand dimension');
|
||
|
|
end
|
||
|
|
|
||
|
|
if length(to)==1 && length(x) > 1
|
||
|
|
to = repmat(to,length(x),1);
|
||
|
|
elseif length(to) ~= length(x)
|
||
|
|
error('The upper integration bound is inconsistent with the integrand dimension');
|
||
|
|
end
|
||
|
|
|
||
|
|
F = int_sdpvar(f,x,from,to);
|
||
|
|
if isnumeric(F)
|
||
|
|
F = full(F);
|
||
|
|
end
|