On Thu, 2007-01-11 at 23:12 +0000, Jaime Villate wrote:
> On Thu, 2007-11-01 at 07:43 -0600, Robert Jerrard wrote:
> > If you want to use 3 different
> > > colors, for instance, blue, red and black, use:
> > >
> > > :lisp (defun $gnuplot_color (c) (nth (mod (round c) 3) '(-1 3 1)))
> > > plot2d([sin(x),cos(x),0],[x,0,6])$
> >
> > Perhaps I was not clear enough, I can not find a black line style at
> > all.
> You were clear enough. There is no black style by default, but if you use
> the lisp command I suggested, one of the default colors will be black (-1).
Hmmm, I get 2 blue (lines 3 and -1) and one red line (lines 1), along
with the console output:
(%i1) :lisp (defun $gnuplot_color (c) (nth (mod (round c) 3) '(-1 3 1)))
$GNUPLOT_COLOR
(%i1) plot2d([sin(x),cos(x),0],[x,0,6])$
(%i2)
gnuplot> plot [0.000000000:6.000000000]'/home/bob/maxout.gnuplot_pipes'
index 0 title "sin(x)" with lines 3, '/home/bob/maxout.gnuplot_pipes'
index 1 title "cos(x)" with lines 1, '/home/bob/maxout.gnuplot_pipes'
index 2 title "0" with lines -1
^
line 0: ';' expected
and the console hangs. Ctrl-c gets it back to:
Maxima encountered a Lisp error:
Console interrupt.
Automatically continuing.
To reenable the Lisp debugger set *debugger-hook* to nil.
(%i2)
Bob
--
Dr. Robert J. Jerrard, Professor of Mathematics,
Concordia University College of Alberta,
7128 Ada Blvd., Edmonton, Alberta, T5B 4E4, Canada.
Phone: (780) 479-9291, Fax: (780) 474-1933.