Re: remove tick labels
- To: mathgroup at smc.vnet.net
- Subject: [mg123872] Re: remove tick labels
- From: "Nasser M. Abbasi" <nma at 12000.org>
- Date: Mon, 26 Dec 2011 06:53:09 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <201112241209.HAA13633@smc.vnet.net> <jd71m8$12f$1@smc.vnet.net>
- Reply-to: nma at 12000.org
On 12/25/2011 5:33 AM, Bob Hanlon wrote:
> Show[(plt = Plot[x, {x, 0, 1}]),
> Ticks -> (Ticks /. AbsoluteOptions[plt, Ticks] /.
> {t_, t_, l_List, s_List} -> {t, "", l, s})]
>
> Bob Hanlon
>
I tried something like the above during my attempts, but if you notice,
the ticks on the 'modified' plot do not look the same as the
original one.
If we Compare
Plot[Sin[x], {x, -Pi, Pi}]
with what you have:
Show[(plt = Plot[Sin[x], {x, -Pi, Pi}]),
Ticks -> (Ticks /.
AbsoluteOptions[plt, Ticks] /. {t_, t_, l_List, s_List} -> {t,
"", l, s})]
We notice 2 things:
1) some ticks are lost near the orgin on the x-axis
2) the y-axis ticks no longer looks like in the orginal plot.
--Nasser
- References:
- remove tick labels
- From: markus <markusg.phys@googlemail.com>
- remove tick labels