Re: ScientificForm in Ticks
- To: mathgroup at smc.vnet.net
- Subject: [mg43661] Re: ScientificForm in Ticks
- From: bobhanlon at aol.com (Bob Hanlon)
- Date: Sun, 28 Sep 2003 06:00:41 -0400 (EDT)
- References: <bl3kre$er1$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Module[{p1 = Plot[Exp[x], {x, 0, 10}, DisplayFunction -> Identity], t}, Show[p1, Ticks -> { (t = Ticks /. AbsoluteOptions[p1, Ticks])[[1]], t[[2]] /. {y_, ylab_?NumericQ, r__} -> {y, ScientificForm[y], r}}, DisplayFunction -> $DisplayFunction]]; Bob Hanlon In article <bl3kre$er1$1 at smc.vnet.net>, Veniamin Abalmassov <V.Abalmassov at isp.nsc.ru> wrote: << I would like to have Automatic Ticks in my graph which I generate by Plot command in ScientificForm. Is it possible to do and how? >><BR><BR>