Re: Vertical Asymptote

*To*: mathgroup at smc.vnet.net*Subject*: [mg29857] Re: [mg29831] Vertical Asymptote*From*: BobHanlon at aol.com*Date*: Sat, 14 Jul 2001 01:36:47 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

In a message dated 2001/7/13 4:29:02 AM, Jan.Vuerinckx at Skynet.be writes: >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]}}] > Needs["Graphics`Colors`"]; Plot[Sqrt[(x - 5)/(1 - 3x)], {x, 1/3, 5}, PlotStyle -> Red, PlotRange -> {-1/4, 8.75}, Epilog -> {Blue, AbsoluteDashing[{5, 5}], Line[{{1/3, 0}, {1/3, 8.75}}]}]; Bob Hanlon Chantilly, VA USA