RE: How to plot...

*To*: mathgroup at smc.vnet.net*Subject*: [mg46042] RE: [mg46030] How to plot...*From*: "Owen, HL (Hywel)" <H.L.Owen at dl.ac.uk>*Date*: Tue, 3 Feb 2004 18:20:47 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

Plot[Evaluate[Sin[x]/x], {x, -5, 5}] works just fine. I don't understand what you're trying to in your definition of f3 though. > -----Original Message----- > From: Oliver Kowalke [mailto:oliver.kowalke at t-online.de] To: mathgroup at smc.vnet.net > Sent: 03 February 2004 08:21 > To: mathgroup at smc.vnet.net > Subject: [mg46042] [mg46030] How to plot... > > > Hello, > > I want to plot sin(x)/x on x=0. > > f3 := Which[x==0,1,0<x,Abs[Sin[x]/x]]; > > F3 ist defined on x=0 (analytische Fortsetzung). > How can I force mathematica to plot the graph on x=0? > thx, > Oliver >