Re: Plot a simple function

• To: mathgroup at smc.vnet.net
• Subject: [mg74941] Re: Plot a simple function
• From: Roger Bagula <rlbagula at sbcglobal.net>
• Date: Thu, 12 Apr 2007 04:49:22 -0400 (EDT)
• References: <evab3s\$d6b\$1@smc.vnet.net>

```My investigation of the hanging chain curve and the structure of
suspension briges
which are quadratic   ( Logistic like)
until loaded and then go to a cosh like curve made me try the following
curve:
h = Log[2]/Log[Cosh[1/2]]
f[t_] = 2 - Cosh[t - 1/2]^h
g2 = Plot[f[t], {t, 0, 1}]
Integrate[f[t], {t, 0, 1}]
N[%]
0.706785

The entropy curve:
H[p_] := -p*Log[2, p] - (1 - p)*Log[2, 1 - p]
has area:
Integrate[H[x], {x, 0, 1}]
N[%]
0.721348
This result is much closer than the logistic
and the curves are hard to distinguih fron each other.

As far as I know the powered cosh curve in the unit
square is a new curve. The power is necessary to get the
f[0]=f[1]=0
condition.
Thinking of the Saint Louis arch made me try this.

>
>

```

• Prev by Date: Re: Optimal variable selection in multiple linear regression ?
• Next by Date: Question about Part
• Previous by thread: Re: Plot a simple function
• Next by thread: Default value