MathGroup Archive 2001

[Date Index] [Thread Index] [Author Index]

Search the Archive

User Functions with DisplayTogether

I'm using several graphics functions I've created, such as this:

Graph[title_, func_, xmin_, xmax_, xgridstep_, xtickstep_, ymin_,
      ygridstep_, ytickstep_] :=
    Plot[func, {x, xmin, xmax}, AspectRatio -> (ymax - ymin)/(xmax -
      FrameLabel -> {title, None},
      GridLines -> {Table[{m, {CMYKColor[0, 0, 0, 0.5], 
                AbsoluteThickness [0.5]}}, {m, xmin, xmax,
          Table[{n, {CMYKColor[0, 0, 0, 0.5], AbsoluteThickness
[0.5]}}, {n, 
              ymin, ymax, ygridstep}]},
      PlotStyle -> {CMYKColor[1, 0, 0, 0], AbsoluteThickness[1.5], 
          AbsoluteDashing[{1, 0}]},
      PlotRange -> {{xmin, xmax}, {ymin, ymax}},
      Ticks -> {Range[xmin, xmax, xtickstep], Range[ymin, ymax,

Is it possible to use DisplayTogether with user-created graphics
functions such as the above?

  • Prev by Date: Re: Forcing numbers to be real.
  • Next by Date: Re: OOP
  • Previous by thread: Re: algebraic functions
  • Next by thread: problem with graphics export from UNIX to NT