Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.soft-sys.math.mathematica > #1542
| From | Heike Gramberg <heike.gramberg@gmail.com> |
|---|---|
| Newsgroups | comp.soft-sys.math.mathematica |
| Subject | Re: Nasti jitter in plotsize |
| Date | 2011-04-08 08:15 +0000 |
| Organization | Steven M. Christensen and Associates, Inc and MathTensor, Inc. |
| Message-ID | <inmg74$q1b$1@smc.vnet.net> (permalink) |
You could set ImagePadding to an absolute value, i.e.
Manipulate[
Plot[Sin[1/k x], {x, -k \[Pi], k \[Pi]}, ImagePadding -> 10], {k, 1,
10}]
Heike.
On 7 Apr 2011, at 13:06, roby wrote:
> Dear all,
>
> Manipulate[Plot[Sin[1/k x], {x, -k \[Pi], k \[Pi]}], {k, 1, 10}]
>
> I want to scale my x-axis simultaneously with my function (no I dont
> want to zoom the function)
> What happens is a small jitter of the plot size.
> This jitter exactly happens when the most left (most right) tick mark
> value coincidences with the plot border.
> I tried to remove the first and last tick of the final plot to avoid
> the problem.
>
> I was able to extract the ticks and remove the very first and last
> ones of the plot like this:
> With[{k=3},
> (Plot[Sin[1/k], {x, - k \[Pi], k \[Pi]}] // First@AbsoluteOptions[#,
> Ticks] &) /.
> (Ticks -> {x_, y_}) :> (Ticks -> {Rest@Most[x], Rest@Most@y})
> ]
>
> but I failed by automaticaly (not by hand) replacing the original
> ticks with with the modifyed ticks in the plot.
>
>
> Any suggestion ?
>
> btw constraining the PlotSize and similar dose not help.
>
> Cheers Robert
>
Back to comp.soft-sys.math.mathematica | Previous | Next | Find similar | Unroll thread
Re: Nasti jitter in plotsize Heike Gramberg <heike.gramberg@gmail.com> - 2011-04-08 08:15 +0000
csiph-web