Sponsored links: Algebra eBooks
 

Related

fpprintprec-numer

fpprintprec:3;

l:0.50;

A:0.03*0.04;

Calculate

fpprintprec-gamma-load-sqrt

load("unit");

metricexpandall(4);

setunits(J);

Calculate

fpprintprec-solve

3/11.0;

solve([x+y=3, x...

fpprintprec;

Calculate

fpprintprec-load

load (fft) ;

fpprintprec : 4 ;

L : [1, 2, 3, 4, -1, ...

Calculate

fpprintprec-numer

fpprintprec:5;

k:1;

j:1;

Calculate

fpprintprec-solve

3/11.0;

solve([x+y=3, x...

fpprintprec:7;

Calculate

fpprintprec-linsolve

eq1:x*4+y-2=y;

eq2:x+2=y;

linsolve([eq1,eq2],[x...

Calculate

fpprintprec-is-sqrt

is(sqrt(4)*sqrt(4)=sq...

is(sqrt(7)*sqrt(8)=sq...

is(sqrt(8)=2*sqrt(2));

Calculate

fpprintprec

fpprintprec:3;

54.8/1000;

Calculate

fpprintprec-is-rootscontract-sqrt

is(sqrt(4)*sqrt(4)=sq...

is(sqrt(7)*sqrt(8)=sq...

is(sqrt(8)=2*sqrt(2));

Calculate

fpprintprec

Run Example
(%i1)load (descriptive);
(%o1) /usr/share/maxima/5.21.1/share/contrib/descriptive/descriptive.mac
(%i2) s: matrix([1,-2,0],[-2,5,0],[0,0,2]);
                                [  1   - 2  0 ]
                                [             ]
(%o2)                           [ - 2   5   0 ]
                                [             ]
                                [  0    0   2 ]
(%i3)                 fpprintprec:4 ;
(%o3)                                  4
(%i4) res: principal_components(s, data=false);
                                   [  1   - 2  0 ]
                                   [             ]
(%o4)         principal_components([ - 2   5   0 ], data = false)
                                   [             ]
                                   [  0    0   2 ]
(%i5) 
Run Example
fpprintprec:5;
(%o1)                                  5
(%i2)  u0:0;
(%o2)                                  0
(%i3)  u1:15;
(%o3)                                 15
(%i4)  u2:5;
(%o4)                                  5
(%i5)  u3:3;
(%o5)                                  3
(%i6)  u4:2;
(%o6)                                  2
(%i7)  T:2;
(%o7)                                  2
(%i8) j:makelist(j,j,[15,5,3,2]);
(%o8)                            [15, 5, 3, 2]
(%i9)  k:4;
(%o9)                                  4
(%i10)  xn:0;
(%o10)                                 0
(%i11) xk:%pi;
(%o11)                                %pi
(%i12) N:11;
(%o12)                                11
(%i13) dx:(xk-xn)/(N-1),numer;
(%o13)                               0.314
(%i14) Uvx(x):=u0+s:sum(j*cos((2*%pi*j)/T),j,1,k), numer;
                                             2 %pi j
(%o14)          Uvx(x) := u0 + s : sum(j cos(-------), j, 1, k)
                                                T
(%i15) for x:xn thru xk step dx do display(Uvx(x)),numer;
                                 Uvx(0) = 2.0

                               Uvx(0.314) = 2.0

                               Uvx(0.628) = 2.0

                               Uvx(0.942) = 2.0

                               Uvx(1.2566) = 2.0

                               Uvx(1.5708) = 2.0

                               Uvx(1.885) = 2.0

                               Uvx(2.1991) = 2.0

                               Uvx(2.5133) = 2.0

                               Uvx(2.8274) = 2.0

                               Uvx(3.1416) = 2.0

(%o15)                               done
(%i16) 
Run Example
load (fft) ;

Loading /usr/share/tomcat6/.maxima/binary/binary-gcl/share/numeric/fft-core.o
start address -T 0x2c37000 Finished loading /usr/share/tomcat6/.maxima/binary/binary-gcl/share/numeric/fft-core.o
(%o1)           /usr/share/maxima/5.21.1/share/numeric/fft.lisp
(%i2) fpprintprec : 4 ;
(%o2)                                  4
(%i3) L : [1, 2, 3, 4, -1, -2, -3, -4] ;
(%o3)                  [1, 2, 3, 4, - 1, - 2, - 3, - 4]
(%i4) L1 : fft (L);
(%o4) [0.0, - 1.811 %i - 0.1, 0.0, 0.6 - 0.31 %i, 0.0, 0.31 %i + 0.6, 0.0, 
                                                                1.811 %i - 0.1]
(%i5) L2 : abs (L1);
(%o5)           [0.0, 1.814, 0.0, 0.68, 0.0, 0.68, 0.0, 1.814]
(%i6) plot2d([discrete, makelist(i*%pi/8, i, 0, 8),                            L2]);
plotplot2d([discrete, makelist(i*%pi/8, i, 0, 8),                            L2]);
[abs,and,block,col,copy,fpprintprec,genmatrix,ident,invert,length,lmax,makelist,matrix_size,random,submatrix,sum,while] [abs,block,display,fpprec,fpprintprec,return] [abs,fpprintprec,load,makelist,plot2d,sin] [abs,fpprintprec,load,makelist,plot2d] [abs,fpprintprec,load] [addcol,bfloat,echelon,fpprec,fpprintprec,load,matrix,rowop] [append,assume,declare,eliminate,ev,first,fpprintprec,lambda,map,plot2d,solve,sublist] [append,block,fpprec,fpprintprec,plot2d,sqrt,while] [append,float,fpprintprec,makelist,phi,plot2d,product,realroots,sum] [append,float,fpprintprec,makelist,plot2d,product,sum] [ascii,block,concat,eval_string,fpprintprec,is,printf,return,split,sremove,string] [assume,cons,eliminate,ev,fpprintprec,map,plot2d,solve] [assume,declare,eliminate,ev,first,fpprintprec,lambda,map,plot2d,solve,sublist] [assume,diff,ev,false,float,fpprintprec,ic1,inf,kill,lambda,limit,map,numer,ode2,ratprint,ratsimp,rhs,solve,subst] [assume,fpprec,fpprintprec,kill,solve] [bfloat,display2d,false,float,fpprec,fpprintprec,pi,rationalize] [bfloat,ev,expand,fpprec,fpprintprec,linsolve,numer,sqrt] [bfloat,float,fpprintprec,pi,reset] [bfloat,fpprec,fpprintprec] [block,display,fpprec,fpprintprec,jacobi,printf,return] [block,display,fpprec,fpprintprec,return] [block,do,float,fpprintprec,print] [cabs,carg,cos,fpprintprec,load,makelist,plot2d,sin] [cabs,carg,fpprintprec,load,makelist,plot2d,sin] [cons,eliminate,ev,fpprintprec,map,plot2d,solve] [cos,find_root,float,fpprintprec,sin] [cos,float,fpprintprec,linsolve,load,pi,sin] [cos,fpprintprec,numer,pi,sum] [diff,fpprintprec,linsolve,load,matrix,transpose] [display2d,false,float,fpprec,fpprintprec,pi,rationalize] [eliminate,ev,fpprintprec,map,plot2d,solve] [ev,float,fpprintprec,realroots] [exp,float,fpprintprec,subst,taylor] [exp,fpprintprec,numer,pi,sin] [expand,factor,float,fpprintprec,load,sqrt] [false,float,fpprintprec,kill,ratprint,solve] [find_root,fpprintprec] [float,fpprec,fpprintprec] [float,fpprintprec,linsolve,load,pi] [float,fpprintprec,load,pi] [float,fpprintprec,load] [float,fpprintprec] [fpprec,fpprintprec,linsolve,matrix] [fpprec,fpprintprec,solve] [fpprintprec,linsolve] [fpprintprec,load] [fpprintprec,numer,sum] [fpprintprec,numer] [fpprintprec,solve] [fpprintprec]

Related Help

Help for Fpprintprec