Sponsored links: Algebra eBooks
 

Related

factorout-false-lhs-ratsimpexpons

eq:(x^2-17*x+1)^(x^2-...

ratdisp:false;

ratsimpexpons:false;

Calculate

factorout

g:q-(q-p)/(1-p);

factorout(g, q);

Calculate

factorout-false-lhs-ratsimpexpons

eq:(x^2-17*x+1)^(x^2-...

ratdisp:false;

ratsimpexpons:false;

Calculate

factorout

g:q-(q-p)/(1-p);

factorout(g, q);

Calculate

factorout

g:q-(q-p)/(1-p);

factorout(g, q, p);

Calculate

factorout

expr: -((1+s*s*l*c)*(...

factorout(expr,s);

Calculate

factorout

expr: -((1+s*s*l*c)*(...

factorout(%,s);

Calculate

factorout

g:q-(q-p)/(1-p^2);

factorout(g, q);

Calculate

factorout-subst

expr: z^3 + a1*z*w + ...

factorout (subst (exp...

Calculate

factorout-sqrt

m=sqrt(x^2+(sqrt(e^2-...

factorout(%,x);

Calculate

factorout

Run Example
(%i1)expr: -((1+s*s*l*c)*((u-s*r)*(u+s*(w+p))-u*(u+s*w)))/((u+s*(w+p))*(s*l+(1+s*s*l*c)*s*r));
                   2
             (c l s  + 1) ((u - r s) (s (w + p) + u) - u (s w + u))
(%o1)      - ------------------------------------------------------
                               2
                    (r s (c l s  + 1) + l s) (s (w + p) + u)
(%i2) factorout(expr,s);
                   2
             (c l s  + 1) ((u - r s) (s (w + p) + u) - u (s w + u))
(%o2)      - ------------------------------------------------------
                               2
                    (r s (c l s  + 1) + l s) (s (w + p) + u)
(%i3) 
Run Example
p(t):=a*t^3+b*t^2+c*t+d;
                                    3      2
(%o1)                    p(t) := a t  + b t  + c t + d
(%i2) s:solve([p(-1)=p0,p(0)=p1,p(1)=p2,p(2)=p3],[a,b,c,d]);
              - p3 + 3 p2 - 3 p1 + p0      p2 - 2 p1 + p0
(%o2) [[a = - -----------------------, b = --------------, 
                         6                       2
                                              p3 - 6 p2 + 3 p1 + 2 p0
                                        c = - -----------------------, d = p1]]
                                                         6
(%i3) r(t):=-(-p3+3*p2-3*p1+p0)/6*t^3+(p2-2*p1+p0)/2*t^2-(p3-6*p2+3*p1+2*p0)/6*t+p1;
              - (- p3 + 3 p2 + (- 3) p1 + p0)  3   p2 - 2 p1 + p0  2
(%o3) r(t) := ------------------------------- t  + -------------- t
                             6                           2
                                             - (p3 - 6 p2 + 3 p1 + 2 p0)
                                           + --------------------------- t + p1
                                                          6
(%i4) ratsimp(r(1/4)), expand;
                          5 p3   35 p2   105 p1   7 p0
(%o4)                   - ---- + ----- + ------ - ----
                          128     128     128     128
(%i5) ratsimp(r(1/2)), expand;
                              p3   9 p2   9 p1   p0
(%o5)                       - -- + ---- + ---- - --
                              16    16     16    16
(%i6) ratsimp(r(3/4)), expand;
                          7 p3   105 p2   35 p1   5 p0
(%o6)                   - ---- + ------ + ----- - ----
                          128     128      128    128
(%i7) factorout(expand(r(t)), 1-t, t);
          3       3       3       3       2       2
      p3 t    p2 t    p1 t    p0 t    p2 t    p0 t                         p3 t
(%o7) ----- - ----- + ----- - ----- + ----- + ----- - p1 (t - 1) (t + 1) - ----
        6       2       2       6       2       2                           6
                                                                    p1 t   p0 t
                                                           + p2 t - ---- - ----
                                                                     2      3
(%i8) 
Run Example
parab:p=k*q^2;
                                          2
(%o1)                              p = k q
(%i2) zz: z=sin(a)*p + cos(a)*q;
(%o2)                       z = cos(a) q + sin(a) p
(%i3) yy: y=cos(a)*p - sin(a)*q;
(%o3)                       y = cos(a) p - sin(a) q
(%i4) factorout(expand(eliminate([parab, zz, yy], [p, q])[1]=0), a, k);
         2     2  2                    2          3             2
(%o4) cos (a) k  z  - 2 cos(a) sin(a) k  y z - sin (a) k z - cos (a) sin(a) k z
                              2     2  2             2             3
                         + sin (a) k  y  - cos(a) sin (a) k y - cos (a) k y = 0
(%i5) 

Related Help

Help for Factorout