Sponsored links: Algebra eBooks
 

Related

abs-define-plot2d
plot2d(f(x), [x,-10,10]);

define(f(x), abs(2*x^...

plot2d(f(x), [x,-10,1...

Calculate

abs-define-float-plot2d-realroots
plot2d( [f(x),g(x)], [x,-10,10], [y,-10,10] );

define(f(x), (x^4 + 3...

define(g(x), abs(4*x/...

f(3.2);

Calculate

abs-plot2d
plot2d(f,[n, -1, 1]);

f : abs(1/n-1);

plot2d(f,[n, -1, 1]);

Calculate

abs-define-find_root-float-realroots

define (f(x), (x^4+ 3...

define (g(x), abs (4*...

f(5.5);

Calculate

abs-define-float-realroots

define (f(x), (x^4+3*...

define (g(x), abs(4*x...

f(3.2);

Calculate

abs-jacobian

jacobian (-abs([x, y,...

Calculate

abs-plot2d-simpsum-sin-sum
plot2d([b1(x),b2(x),b3(x),b4(x),b5(x),b6(x)],[x,0,%pi/2],[y,0,1],[color,purple,orange,blue,brown,green,red],[legend,"T0","T2","T4","T6","T8","T10"],[xlabel,"Periodo(Rad)"],[ylabel,"Error relativo(%)"]);

m(x):=sum((((2*n)!/(2...

m1(x):=sum((((2*n)!/(...

m2(x):=sum((((2*n)!/(...

Calculate

abs-define-find_root-plot2d
plot2d(h(x), [x, -5, 5], [y, 35, 45]);

define(h(x), abs (2*x...

h(3);

plot2d(h(x), [x, -5, ...

Calculate

abs-diff-log-plot2d
plot2d(f(x),[x,1,3]);

f(x) := log(1 + abs(x...

plot2d(f(x),[x,1,3]);

diff(f(x),x);

Calculate

abs-define-float

define(f(x),(x^4+3*x^...

define(g(x),abs(4*x/%...

f(5.5);

Calculate

abs

Run Example
(%i1)define(g(x), abs((4*x)/%e));
                                        - 1
(%o1)                       g(x) := 4 %e    abs(x)
(%i2) 
Run Example
Puiab:[Pk=abs(ak)^2-abs(bk)^2,Uk=(ak+bk)*sqrt(Z0k), Ik=(ak-bk)/sqrt(Z0k)];
                  2     2                                  ak - bk
(%o1)     [Pk = ak  - bk , Uk = (bk + ak) sqrt(Z0k), Ik = ---------]
                                                          sqrt(Z0k)
(%i2) abUI:[ak=(Uk+Z0k*Ik)/(2*sqrt(Z0k)),bk=(Uk-Z0k*Ik)/(2*sqrt(Z0k))];
                           Ik Z0k + Uk       Uk - Ik Z0k
(%o2)                [ak = -----------, bk = -----------]
                           2 sqrt(Z0k)       2 sqrt(Z0k)
(%i3) spoj:[U1=(a1+b1)*sqrt(Z01),  U2=(a2+b2)*sqrt(Z02),I1=(a1-b1)/sqrt(Z01),  I2=(a2-b2)/sqrt(Z02),U1=U2, I1+I2=0];
                                                                 a1 - b1
(%o3) [U1 = (b1 + a1) sqrt(Z01), U2 = (b2 + a2) sqrt(Z02), I1 = ---------, 
                                                                sqrt(Z01)
                                                a2 - b2
                                          I2 = ---------, U1 = U2, I2 + I1 = 0]
                                               sqrt(Z02)
(%i4) spoj1:[eliminate(spoj,  [U1, U2, I1, I2])];
(%o4) [[- (- b2 - a2) sqrt(Z02) - (b1 + a1) sqrt(Z01), 
                            b1 sqrt(Z02) - a1 sqrt(Z02) + (b2 - a2) sqrt(Z01)]]
(%i5) 
Run Example
H(a1,a2,b0,b1,b2,z):=(b0+b1*z^(-1)+b2*z^(-2))/(1+a1*z^(-1)+a2*z^(-2));
                                                   - 1       - 2
                                          b0 + b1 z    + b2 z
(%o1)         H(a1, a2, b0, b1, b2, z) := ----------------------
                                                  - 1       - 2
                                          1 + a1 z    + a2 z
(%i2) H1(f,F0):=H(-1.978882,0.979126,0.989502,-1.979004,0.989502,exp(%i*2*%pi*f/F0));
(%o2) H1(f, F0) := H(- 1.978882, 0.979126, 0.989502, - 1.979004, 0.989502, 
                                                                   %i 2 %pi f
                                                               exp(----------))
                                                                       F0
(%i3) plot2d([abs(H1(f,16000)),abs(H1(f,20000))],[f,0,500]);
plotplot2d([abs(H1(f,16000)),abs(H1(f,20000))],[f,0,500]);float(abs(H1(50,16000)));
(%o4)                          0.88245850910269
(%i5) float(abs(H1(50,20000)));
(%o5)                          0.74462866826056
(%i6) 

Related Help

Help for Abs