       Re: entering an equation

• To: mathgroup at smc.vnet.net
• Subject: [mg21606] Re: [mg21592] entering an equation
• From: BobHanlon at aol.com
• Date: Sun, 16 Jan 2000 22:43:52 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```For the function Log[2, Log[2, x]] to be real, Log[2, x] must be positive.

Log[2, x] > 0

Log[x]/Log > 0

That is,

Log[x] > 0;

or

x > Exp

x > 1

Needs["Algebra`InequalitySolve`"]

InequalitySolve[Log[2, x] > 0, x]

InequalitySolve::npi  A nonpolynomial equation or inequality encountered. The
solution set may be incorrect.

x > 1

Table[{x, Log[2, Log[2, x]]}, {x, 0., 1.5, .25}]

{{0., Indeterminate}, {0.25, 1. + 4.532360141827193*I},
{0.5, 0. + 4.532360141827193*I},
{0.75, -1.2686864028144482 + 4.532360141827193*I},
{1., Indeterminate}, {1.25, -1.6351896075841128},
{1.5, -0.773583951828313}}

Plot[Log[2, Log[2, x]], {x, 1, 10}];

Bob Hanlon

In a message dated 1/16/2000 5:18:21 AM, mark at ratbyte.com writes:

>I am trying to plot a series of functions in Mathematica...one is giving
>me
>trouble. I need : ln2 (ln2 x)
>
>    I enter: Log[2, Log[2,x]]
>
>and I get:
>
>is not a machine-size real \
>number at \!\(x\) = \!\(4.1666666666666667`*^-7\)."
>
>Does anyone have any suggestions?
>

```

• Prev by Date: Re: Plotting A verticle line?
• Next by Date: Mathematica???
• Previous by thread: Re: entering an equation
• Next by thread: Re: entering an equation