Re: How to draw a discontinuous function (set of points)
- To: mathgroup at smc.vnet.net
- Subject: [mg79333] Re: How to draw a discontinuous function (set of points)
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Wed, 25 Jul 2007 02:01:08 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <f84j0d$ova$1@smc.vnet.net>
Domnul Mihnea wrote: > Hello! > > I would like to draw the graph of the following function in Mathematica 6, f : Zn -> Zn, f(x) = x^2 (mod n), n given. I wanted to use the plot function (n being 1000) as in: > > Plot[Mod[x^2,1000], {x, 0, 999}, PlotStyle -> {Hue[.6], PointSize[0.01]}, AxesLabel -> {n, Mod[x^2,1000]}, TextStyle -> {FontFamily -> "Times", FontSize -> 14}] > > The problem is that Plot draws the graph for ALL the real points x between 0 and 999 (the interval [0,999]), when I would require the function to be applied just to the set natural numbers from 0 to 999 (the graph should be just a set of points). > > Thanks for reading my post! Any help would be more than welcome! Hi Domnul, What you want to do is to build a list of values that will be plotted by *ListPlot* so only discrete values of x will be plotted. For instance, data = Table[Mod[x^2, 1000], {x, 0, 999}]; ListPlot[data, PlotStyle -> {Hue[.6], PointSize[0.01]}, AxesLabel -> {n, Mod[x^2, 1000]}, TextStyle -> {FontFamily -> "Times", FontSize -> 14}] Regards, Jean-Marc