El Jueves, 28 de Abril de 2005 12:57, Fabrizio Caruso escribió:
> Hi again!
>
> I need to draw some lines, points and
> text with Maxima.
>
> Which commands are available for this
> purpose?
I asked the same some months ago. In Linux+Maxima 5.9.1+gnuplot, make
(%i1) bs:[[64,-104],[64,-99],[61,-95],[57,-95],[55,-94],[55,-90],[72,-89],
[80,-88],[77,-86],[80,-88],[82,-91],[80,-88],[72,-89],[55,-90],[47,-89],
[39,-87],[33,-84],[32,-81],[35,-75],[36,-69],[42,-69],[45,-68],[42,-69],
[36,-69],[35,-67],[35,-62],[35,-60],[39,-60],[45,-61],[51,-61],[53,-65],
[56,-68],[61,-70],[67,-71],[73,-70],[78,-67],[80,-64],[81,-61],[78,-58],
[75,-60],[75,-62],[78,-62],[81,-61],[81,-56],[79,-50],[75,-47],[70,-44],
[62,-44],[58,-45],[53,-50],[52,-52],[49,-53],[48,-52],[48,-50],[49,-48],
[51,-49],[52,-52],[51,-54] ,[51,-57],[51,-61],[45,-61],[39,-60],[35,-60],
[32,-57],[32,-52],[32,-49],[35,-45],[39,-42],[43,-41],[48,-42],[51,-43],
[55,-47],[51,-43],[48,-42],[43,-41],[44,-38],[47,-35],[54,-16],[56,-5],
[60,-11],[64,-6],[67,-12],[72,-7],[74,-14],[80,-9],[80,-16],[86,-11],
[87,-17],[92,-12],[93,-21],[99,-16],[100,-22], [106,-19],[107,-27],[115,-25],
[110,-32],[94,-72],[91,-72],[88,-73],[87,-74], [88,-76],[91,-76],[91,-79],
[89,-81],[91,-79],[91,-76],[94,-77],[94,-79],[94, -77],[91,-76],[88,-76],
[87,-74],[88,-73],[91,-72],[94,-72],[97,-75],[98,-80] ,[97,-82],[94,-84],
[91,-85],[87,-83],[84,-80],[87,-83],[91,-85],[91,-95],[92,-102],[85,-105],
[69,-106],[64,-104]]$
(%i2) debuxo(pts1):=block([numer:true,display2d:false],
with_stdout("maxout.gnuplot",
print("set terminal x11"),
print("set zeroaxis"),
print("plot '-' with lines 1"),
for y in pts1 do print(y[1], y[2]) ),
system("gnuplot -persist maxout.gnuplot"),
system("rm maxout.gnuplot") )$
(%i3) debuxo(bs)$
In ms-windows, substitute the 7th line in (%i2) by
system("wgnuplot -persist maxout.gnuplot"),
If you want isolated points, substitute the 5th line in (%i2) by
print("plot '-' with points 1"),
I'd suggest to visit gnuplot web site to get familiar with its language.
I think in version 5.9.2 it will be pretty easier.
Hope this helps
Mario
--
---------------------------
Mario Rodriguez Riotorto
www.biomates.net