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_,
ymax_, 
      ygridstep_, ytickstep_] :=
    Plot[func, {x, xmin, xmax}, AspectRatio -> (ymax - ymin)/(xmax -
xmin),
      FrameLabel -> {title, None},
      GridLines -> {Table[{m, {CMYKColor[0, 0, 0, 0.5], 
                AbsoluteThickness [0.5]}}, {m, xmin, xmax,
xgridstep}], 
          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,
ytickstep]}];

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