Re: problems with FrameTicks

• To: mathgroup at smc.vnet.net
• Subject: [mg131112] Re: problems with FrameTicks
• From: Peter Pein <petsie at dordos.net>
• Date: Wed, 12 Jun 2013 05:38:12 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-outx@smc.vnet.net
• Delivered-to: mathgroup-newsendx@smc.vnet.net
• References: <kp6fru\$ndj\$1@smc.vnet.net>

```Am 11.06.2013 08:25, schrieb van zano:
> Dear All,
>  I have problems in getting FrameTicks do what I would like it to do.
> The problem is the following:
> in plotting
>
> Plot[{3*10^20, 4*10^20}, {x, 0, 105},
>  PlotStyle -> Black,
>  Filling -> {2 -> {1}},
>  FillingStyle -> LightRed,
>  Frame -> True,
>  Axes -> None,
>  FrameLabel -> {"x", None, None, "y"},
>  BaseStyle -> {FontSize -> 32, FontFamily -> "Arial"},
>  FrameStyle -> Directive[Black, AbsoluteThickness[3]],
>  PlotRange -> {All, {0, 6*10^20}},
>  FrameTicks -> {{None,
>     Table[{n*10^20, n*Superscript[10, 20]}, {n, 1, 6}]}, {Automatic,
>     None}}]
>
>
> I would like to have on the y axis (on the right) nice looking ticks. That means:
> - starting with "1*10^20" (why does it drop the "1"?)
> - with a multiplication symbol in between the prefactor "n" and the "10^20"
>
> thank you in advance, Luigi
>
Table[{n 10 ^20, ToString[n] <> "\[CenterDot]10^20"}, {n, 1, 6}]

will work if you mark 10^20 with mouse or keyboard and press
Ctrl-Shift-N and delete the generated parantheses. Probably there is an
easier way, but I am not aware of that :(

Peter

P.S. In place of \[Centerdot] you might want want to try \[Times],
\[Cross], \[Star] or sth. like these.

```

• Prev by Date: Re: a trivial task?
• Next by Date: Re: Not sure this limit is right...
• Previous by thread: Re: problems with FrameTicks
• Next by thread: Re: problems with FrameTicks