Sponsored links: Algebra eBooks
 

Related

cos-define-diff-expand-find_root-float-log-plot2d
plot2d ( [f(x),z(x)], [x,0,8], [y,1,1.8]);

define (f(x), log(4 +...

a : 3;

float(f(a));

Calculate

cos-define-diff-expand-find_root-float-log-plot2d
plot2d( [f(x),z(x)], [x, 0,8], [y,1,1.8] );

define(f(x), log(4+co...

f(2.5);

float(f(3));

Calculate

cos-define-diff-expand-find_root-float-log-plot2d
plot2d([f(x), z(x)], [x,2,4], [y,0,2]);

define(f(x), log(4+co...

a:3;

float(f(a));

Calculate

cos-define-diff-expand-find_root-float-log

define (f(x), log (4+...

float(f(3));

define (fp(x), diff (...

Calculate

cos-define-diff-expand-find_root-float-log-plot2d
plot2d( [f(x),z(x)], [x, 0,8], [y,1,1.8] );

define(f(x), log(4+co...

f(2.5);

float(f(3));

Calculate

cos-define-diff-expand-find_root-float-log-pi

define (f(x), log(4 +...

a : 3;

float(f(a));

Calculate

cos-define-diff-expand-find_root-float-log-plot2d
plot2d( f(x), [x,2,4],[y,-5,5] );

define(f(x), log(4+co...

a: 3;

float(f(a));

Calculate

[cos,define,diff,expand,find_root,float,log]

Run Example
(%i1)define (f(x), log(4+cos(x)));
(%o1)                       f(x) := log(cos(x) + 4)
(%i2) a:3;
(%o2)                                  3
(%i3) define (fp(x), diff(f(x),x));
                                          sin(x)
(%o3)                        fp(x) := - ----------
                                        cos(x) + 4
(%i4) b:7;
(%o4)                                  7
(%i5) h:b-a;
(%o5)                                  4
(%i6) define(y(x), float(expand(f(a)+fp(a)*(x-a))));
(%o6)           y(x) := 1.242593391787529 - 0.04688360673536 x
(%i7) s: find_root (fp(x)=0, x, 2,4);
(%o7)                          3.141592653589793
(%i8) 
Run Example
define (f(x), log(4+cos(x)));
(%o1)                       f(x) := log(cos(x) + 4)
(%i2) a: 3;
(%o2)                                  3
(%i3) b: 7;
(%o3)                                  7
(%i4) dq: (f(a+h)-f(a))/h;
                     log(cos(h + 3) + 4) - log(cos(3) + 4)
(%o4)                -------------------------------------
                                       h
(%i5) define (z(x), expand(f(a)+dq*(x-a)));
              log(cos(h + 3) + 4) x   log(cos(3) + 4) x   3 log(cos(h + 3) + 4)
(%o5) z(x) := --------------------- - ----------------- - ---------------------
                        h                     h                     h
                                            3 log(cos(3) + 4)
                                          + ----------------- + log(cos(3) + 4)
                                                    h
(%i6) define (fp(x), diff (f(x), x));
                                          sin(x)
(%o6)                        fp(x) := - ----------
                                        cos(x) + 4
(%i7) define (y(x), expand(float(f(a)+fp(a)*(x-a))));
(%o7)           y(x) := 1.242593391787529 - 0.04688360673536 x
(%i8) S: find_root(y(x)= z(x), x, 2, 4);
(%o8) find_root(1.242593391787529 - 0.04688360673536 x = 
log(cos(h + 3) + 4) x   log(cos(3) + 4) x   3 log(cos(h + 3) + 4)
--------------------- - ----------------- - ---------------------
          h                     h                     h
   3 log(cos(3) + 4)
 + ----------------- + log(cos(3) + 4), x, 2.0, 4.0)
           h
(%i9) 
Run Example
define( f(x), log(4+cos(x)));
(%o1)                       f(x) := log(cos(x) + 4)
(%i2) define(fp(x),diff(f(x),x));
                                          sin(x)
(%o2)                        fp(x) := - ----------
                                        cos(x) + 4
(%i3) a:3;
(%o3)                                  3
(%i4) b:7;
(%o4)                                  7
(%i5) h:b-a;
(%o5)                                  4
(%i6) dq:(f(a+h)-f(a))/h;
                       log(cos(7) + 4) - log(cos(3) + 4)
(%o6)                  ---------------------------------
                                       4
(%i7)  float(define(z(x), expand(f(a)+dq*(x-a))));
(%o7)            z(x) := 0.11425580910662 x + 0.75917514426159
(%i8) float(S: find_root(fp(x)=0,x,2,4));
(%o8)                          3.141592653589793
(%i9) f(3.141592653589793);
(%o9)                          1.09861228866811
(%i10) 
[abs,define,diff,expand,find_root,float,plot2d,realroots] [abs,define,diff,expand,find_root,float,realroots] [abs,define,diff,find_root,float,pi,plot2d] [abs,define,diff,find_root,float,realroots] [abs,define,diff,float,pi] [abs,define,find_root,float,realroots] [atan2,collectterms,cos,expand,factor,float,log,plot2d,ratsimp,sin,solve,tan,trigexpand] [cos,define,diff,expand,find_root,float,log,plot2d] [cos,define,diff,expand,find_root,float,log] [cos,define,diff,expand,float,log,plot2d] [cos,define,diff,expand,float,log] [cos,define,diff,find_root,float,log,plot2d] [cos,define,diff,find_root,float,log] [cos,define,diff,find_root,float,plot2d,sqrt] [cos,define,diff,find_root,float,sqrt] [cos,define,diff,find_root,plot2d,sin] [cos,define,diff,float,log] [cos,define,diff,float,plot2d,sqrt] [cos,define,diff,float,sin] [cos,define,diff,float,sqrt] [cos,define,diff,log] [cos,define,diff,sin] [cos,define,float,log] [cos,define,log] [cos,diff,ev,find_root,plot2d] [cos,diff,float,ic2,ode2,plot2d,rhs,sqrt] [cos,diff,float,integrate,sin] [cos,diff,log,sin] [cos,diff,log] [define,diff,expand,find_root,float,plot2d,realroots] [define,diff,expand,find_root,float,realroots] [define,diff,expand,float,plot2d,realroots] [define,diff,expand,float,plot2d,sin] [define,diff,expand,float,realroots] [define,diff,expand,float,sin] [define,diff,expand,float] [define,diff,expand] [define,diff,find_root,float,log,sin] [define,diff,find_root,float,log] [define,diff,find_root,float,plot2d,sqrt] [define,diff,find_root,float,realroots] [define,diff,find_root,log,sin] [define,diff,find_root,plot2d,sin] [define,diff,float,log,sin] [define,diff,float,log] [define,diff,float,plot2d,realroots] [define,diff,float,realroots] [define,diff,float,solve] [define,diff,log,sin] [define,expand,float]

Related Help

Help for Cos

Help for Define

Help for Diff

Help for Expand

Help for Find_root

Help for Float

Help for Log