- #1

- 121

- 1

You are using an out of date browser. It may not display this or other websites correctly.

You should upgrade or use an alternative browser.

You should upgrade or use an alternative browser.

- Mathematica
- Thread starter cryptist
- Start date

- #1

- 121

- 1

- #2

- 1,069

- 29

Study all the responses here and see if you can adapt it to what you need

http://stackoverflow.com/questions/6204898/plotting-on-the-y-axis-in-mathematica

This might not be an understandable or easy or dependable thing to do.

Start by trying to reproduce exactly the examples that they show. Then make very small changes and see if it continues to work. Try to figure out what went wrong and how to possibly correct it if it fails. Gradually work up to the actual problem you have.

http://stackoverflow.com/questions/6204898/plotting-on-the-y-axis-in-mathematica

This might not be an understandable or easy or dependable thing to do.

Start by trying to reproduce exactly the examples that they show. Then make very small changes and see if it continues to work. Try to figure out what went wrong and how to possibly correct it if it fails. Gradually work up to the actual problem you have.

Last edited:

- #3

- 121

- 1

But I guess it does not work for ListPlot. Mathematica didn't draw anything when I use that command. My data contains points generated by ListPlot and I want to draw horizontal filling lines from points to the y-axis.

- #4

- 1,069

- 29

- #5

- 121

- 1

ListPlot[Table[{x, x*x}, {x, 1, 5, 1}], Filling -> Bottom,

PlotStyle -> {Black, PointSize[0.015]}]

When you plot the code above, there will be a filling from points to x-axis. I want also a filling from points to y-axis.

How can I do that?

- #6

- 1,069

- 29

Thank you. A good simple clear concrete example makes it much more likely to give you an answer like you are looking for.

In[1]:= Show[{

ListPlot[Table[{x, x*x}, {x, 1, 5, 1}], Filling -> Bottom, PlotStyle -> {Black, PointSize[0.015]}],

Graphics[Table[Line[{{1, x^2}, {x, x^2}}], {x, 1, 5, 1}]]

}]

Out[1]= ...PlotSnipped...

Then, only if you really need to, you spend minutes or hours or days fiddling with the hundreds of options and directives to adjust the style to try to get close to exactly what you want.

In[1]:= Show[{

ListPlot[Table[{x, x*x}, {x, 1, 5, 1}], Filling -> Bottom, PlotStyle -> {Black, PointSize[0.015]}],

Graphics[Table[Line[{{1, x^2}, {x, x^2}}], {x, 1, 5, 1}]]

}]

Out[1]= ...PlotSnipped...

Then, only if you really need to, you spend minutes or hours or days fiddling with the hundreds of options and directives to adjust the style to try to get close to exactly what you want.

Last edited:

Share:

- Replies
- 9

- Views
- 8K