Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1995
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1995

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

Search the Archive

Re: Graphic Bugs

  • To: mathgroup at christensen.cybernetics.net
  • Subject: [mg1213] Re: [mg1185] Graphic Bugs
  • From: Anthony Rebello <arebello at knox.edu>
  • Date: Tue, 23 May 1995 04:27:46 -0400

	I'm sorry Xah.  The answer I first gave you was written in five 
seconds based on an erroneous guess about Prolog.  I think Prolog should 
be affected by PlotRange->All.  Hopefully that will change in future 
versions.  Until then here is a tempory function that will do plots and 
include graphics primitives which may not be within the plot range.  

Clear[PlotPrimitive]
PlotPrimitive[fun_,xrange:{_,_,_},primitive_,opts___Rule] :=
 	Show[Plot[fun,xrange,opts,
 			DisplayFunction->Identity],
 		Graphics[primitive],
 			DisplayFunction->$DisplayFunction]

Here is an exampole of how it would handle your initial function and 
primitive.  It doesn't even need PlotRange->All.

 PlotPrimitive[{ Sin@x }, {x,0, 5},
	{Thickness[.06],Line[{{-1,.5},{-4,.5}}]}]

NUMBERS-ARE-THE-ROOT-OF-ALL-EVIL..NUMBERS_A
.                                         R              
L                                         E               
I             Anthony Rebello             |       
V              Knox  College              T                           
E             Math Department             H                 
|                                         E              
L                                         |      
LA-FO-TOOR-EHT-ERA-SREBMUN.LIVE-LLA-FO-TOOR



  • Prev by Date: Re: numerical roots of a polynomial
  • Next by Date: Re: BUGGY Graphics
  • Previous by thread: Re: Graphic Bugs
  • Next by thread: Re: Graphic Bugs