Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > comp.soft-sys.math.mathematica > #1542

Re: Nasti jitter in plotsize

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)

Show all headers | View raw


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


Thread

Re: Nasti jitter in plotsize Heike Gramberg <heike.gramberg@gmail.com> - 2011-04-08 08:15 +0000

csiph-web