Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Vertical Asymptote

• To: mathgroup at smc.vnet.net
• Subject: [mg29860] Re: [mg29831] Vertical Asymptote
• From: Tomas Garza <tgarza01 at prodigy.net.mx>
• Date: Sat, 14 Jul 2001 01:36:50 -0400 (EDT)
• References: <200107130819.EAA14977@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

Use Epilog:

In[1]:=
Plot[{Sqrt[(x - 5)/(1 - 3x)], 1/3}, {x, 1/3, 5}, 
  PlotStyle -> {{RGBColor[0, 0, 0]}, {RGBColor[0, 0, 1]}}, 
  Epilog -> Line[{{1/3, 0}, {1/3, 10}}]]

Tomas Garza
MexicoCity
----- Original Message ----- 
From: "Jan Vuerinckx" <Jan.Vuerinckx at Skynet.be>
To: mathgroup at smc.vnet.net
Subject: [mg29860] [mg29831] Vertical Asymptote


> Hello,
> 
> I am new to Mathematica and i try to plot the vertical asymptote at
> x=1/3 for
> Plot[{Sqrt[(x - 5)/(1 - 3x)], 1/3}, {x, 1/3, 5}, 
>   PlotStyle -> {{RGBColor [0, 0, 0]}, {RGBColor [0, 0, 1]}}]
> Can someone give me a hint please.
> 
> Thanks
> Jan
> 

• References:
  • Vertical Asymptote
    • From: Jan Vuerinckx <Jan.Vuerinckx@Skynet.be>