 
 
 
 
 
 
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>

