Sponsored links: Algebra eBooks
 

Related

set_plot_option

set_plot_option([gnup...

Calculate

set_plot_option

set_plot_option ([gri...

Calculate

set_plot_option

set_plot_option ([gri...

Calculate

set_plot_option

set_plot_option([gnup...

Calculate

set_plot_option-sin

set_plot_option ([gri...

Calculate

set_plot_option-sin

set_plot_option ([gri...

Calculate

set_plot_option

? set_plot_option;

Calculate

set_plot_option

set_plot_option ([gri...

Calculate

set_plot_option

set_plot_option([gnup...

Calculate

set_plot_option

set_plot_option([gnup...

Calculate

set_plot_option

Run Example
(%i1)load(implicit_plot);
(%o1)      /usr/share/maxima/5.21.1/share/contrib/implicit_plot.lisp
(%i2) line:y=3*x-5;
(%o2)                             y = 3 x - 5
(%i3) circle:(x-2)^2+(y-3)^2=2;
                                   2          2
(%o3)                       (y - 3)  + (x - 2)  = 2
(%i4) equation1:x^2+4*y^2=1;
                                    2    2
(%o4)                            4 y  + x  = 1
(%i5) equation2:x^2-4*y^2=1;
                                  2      2
(%o5)                            x  - 4 y  = 1
(%i6) equation3:y^2=x^3-2*x+1;
                                2    3
(%o6)                          y  = x  - 2 x + 1
(%i7) equation4:y^2=x^3-2*x+5;
                                2    3
(%o7)                          y  = x  - 2 x + 5
(%i8) equation5:y^6=x^2-x^6;
                                  6    2    6
(%o8)                            y  = x  - x
(%i9) equation6:((x^2+y^2-1)^3=x^2*y^3);
                              2    2     3    2  3
(%o9)                       (y  + x  - 1)  = x  y
(%i10) equation7:y=2*x^2-10*x+14;
                                    2
(%o10)                       y = 2 x  - 10 x + 14
(%i11) equation8:x^2-6*x+y^2-8*y+22=0;
                          2          2
(%o11)                   y  - 8 y + x  - 6 x + 22 = 0
(%i12) set_plot_option([gnuplot_preamble,"set size ratio -1"]);
(%o12) [[t, - 3, 3], [grid, 30, 30], [transform_xy, false], 
[run_viewer, true], [axes, true], [plot_format, gnuplot_pipes], 
[color, blue, red, green, magenta, black, cyan], 
[point_type, bullet, circle, plus, times, asterisk, box, square, triangle, 
delta, wedge, nabla, diamond, lozenge], 
[palette, [hue, 0.25, 0.7, 0.8, 0.5], [hue, 0.65, 0.8, 0.9, 0.55], 
[hue, 0.55, 0.8, 0.9, 0.4], [hue, 0.95, 0.7, 0.8, 0.5]], 
[gnuplot_term, default], [gnuplot_out_file, false], [nticks, 29], 
[adapt_depth, 5], [gnuplot_preamble, set size ratio -1], 
[gnuplot_default_term_command, set term pop], 
[gnuplot_dumb_term_command, set term dumb 79 22], [gnuplot_ps_term_command, se\
t size 1.5, 1.5;set term postscript eps enhanced color solid 24], 
[plot_realpart, false]]
(%i13) implicit_plot([equation6],[x,0,7],[y,0,7]);
plotimplicit_plot([equation6],[x,0,7],[y,0,7]);solve([equation7,equation8],[x,y]);
(%o14) [[x = 1.304970075461879, y = 4.356193142057383], 
[x = 1.664051355206847, y = 2.897620365246265], 
[x = 3.121372031662269, y = 2.272207016670814], 
[x = 3.909606299212598, y = 5.473980309423348]]
(%i15) 
Run Example
load(implicit_plot);
(%o1)      /usr/share/maxima/5.21.1/share/contrib/implicit_plot.lisp
(%i2) set_plot_option([gnuplot_preamble,"set size ratio -1"]);
(%o2) [[t, - 3, 3], [grid, 30, 30], [transform_xy, false], [run_viewer, true], 
[axes, true], [plot_format, gnuplot_pipes], 
[color, blue, red, green, magenta, black, cyan], 
[point_type, bullet, circle, plus, times, asterisk, box, square, triangle, 
delta, wedge, nabla, diamond, lozenge], 
[palette, [hue, 0.25, 0.7, 0.8, 0.5], [hue, 0.65, 0.8, 0.9, 0.55], 
[hue, 0.55, 0.8, 0.9, 0.4], [hue, 0.95, 0.7, 0.8, 0.5]], 
[gnuplot_term, default], [gnuplot_out_file, false], [nticks, 29], 
[adapt_depth, 5], [gnuplot_preamble, set size ratio -1], 
[gnuplot_default_term_command, set term pop], 
[gnuplot_dumb_term_command, set term dumb 79 22], [gnuplot_ps_term_command, se\
t size 1.5, 1.5;set term postscript eps enhanced color solid 24], 
[plot_realpart, false]]
(%i3) p:y=2*x^2 + 3*x - 3;
                                     2
(%o3)                         y = 2 x  + 3 x - 3
(%i4) c:x^2 + y^2 +4*x - 4*y -8=0;
                           2          2
(%o4)                     y  - 4 y + x  + 4 x - 8 = 0
(%i5) solve([p,c],[x,y]);
(%o5) [[x = 0.4704679110202, y = - 1.145916182318752], 
[x = - 1.782214421529911, y = - 1.994066882416397], 
[x = 1.297983392645314, y = 4.263471971066908], 
[x = - 2.986236870699022, y = 5.876511226252159]]
(%i6) implicit_plot([p,c], [x,-7,7],[y,-7,7]);
plotimplicit_plot([p,c], [x,-7,7],[y,-7,7]);
Run Example
set_plot_option([elevation,-45]);
(%o1) [[t, - 3, 3], [grid, 30, 30], [transform_xy, false], [run_viewer, true], 
[axes, true], [plot_format, gnuplot_pipes], 
[color, blue, red, green, magenta, black, cyan], 
[point_type, bullet, circle, plus, times, asterisk, box, square, triangle, 
delta, wedge, nabla, diamond, lozenge], 
[palette, [hue, 0.25, 0.7, 0.8, 0.5], [hue, 0.65, 0.8, 0.9, 0.55], 
[hue, 0.55, 0.8, 0.9, 0.4], [hue, 0.95, 0.7, 0.8, 0.5]], 
[gnuplot_term, default], [gnuplot_out_file, false], [nticks, 29], 
[adapt_depth, 5], [gnuplot_preamble, ], 
[gnuplot_default_term_command, set term pop], 
[gnuplot_dumb_term_command, set term dumb 79 22], [gnuplot_ps_term_command, se\
t size 1.5, 1.5;set term postscript eps enhanced color solid 24], 
[plot_realpart, false], [elevation, - 45]]
(%i2) m_e:9.10938291*E_KG*10^-31;
(%o2)                     9.1093829100000017E-31 E_KG
(%i3) e:1.602176565*E_C*10^-19;
(%o3)                     1.6021765649999998E-19 E_C
(%i4) l:0.05*E_M;
(%o4)                              0.05 E_M
(%i5) d:0.08*E_M;
(%o5)                              0.08 E_M
(%i6) b:0.054*E_M;
(%o6)                              0.054 E_M
(%i7) v_0(U_a):=sqrt((2*e*U_a)/m_e);
                                            2 e U_a
(%o7)                      v_0(U_a) := sqrt(-------)
                                              m_e
(%i8) v_0/299792458;
                                      v_0
(%o8)                              ---------
                                   299792458
(%i9) y1(U,U_a):=(e*U*l^2)/(2*m_e*d*v_0(U_a)^2);
                                                2
                                           e U l
(%o9)                   y1(U, U_a) := -----------------
                                                 2
                                      2 m_e d v_0 (U_a)
(%i10) y2(U,U_a):=(e*U*l*b)/(m_e*d*v_0(U_a)^2);
                                           e U l b
(%o10)                   y2(U, U_a) := ---------------
                                                2
                                       m_e d v_0 (U_a)
(%i11) y(U,U_a):=(y1(U,U_a)+y2(U,U_a))*100/E_M;
                               (y1(U, U_a) + y2(U, U_a)) 100
(%o11)            y(U, U_a) := -----------------------------
                                            E_M
(%i12) plot3d(y(x1,x2),[x1,2000,5000],[x2,2000,5000]);
plotplot3d(y(x1,x2),[x1,2000,5000],[x2,2000,5000]);

Related Help

Help for Set_plot_option