[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[RT] Re: Gen:OEX Entropy



PureBytes Links

Trading Reference Links

Bob,

You really need to look at the later post that I sent
after spotting the problem.

The following (from your post):

> >for value1=0 to length-1 begin
> >  rms=rms+c*c;
> >end;

should read:

> >for value1=0 to length-1 begin
> >  rms=rms+c[value1]*c[value1];
> >end;

but yes, insofar as the original (BUSTED) post is
concerned your derivation appears to be correct.

Funny how a mistake will make us look at something
that has been around a long time.

The correct version is not quite as easy to interpret.

Clyde

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Clyde Lee   Chairman/CEO       (Home of SwingMachine)
SYTECH Corporation             email:   <clydelee@xxxxxxx>
7910 Westglen, Suite 105       Work:    (713) 783-9540
Houston,  TX  77063            Fax:     (713) 783-1092
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
To subscribe / unsubscribe from SwingMachine list
http://www.egroups.com/list/swingmachine/

After joining list the freeware SwingMachine program
(DOS Version) is available in the  VAULT  at:
http://www.egroups.com/list/swingmachine/
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

----- Original Message -----
From: "Bob Fulks" <bfulks@xxxxxxxxxxxx>
To: <realtraders@xxxxxxxxxxxxxxx>
Cc: <realtraders@xxxxxxxxxxxxxxx>
Sent: Monday, June 05, 2000 10:20
Subject: [RT] Re: Gen:OEX Entropy


> At 4:47 PM -0500 6/3/00, Clyde Lee wrote:
> >
> >But do I like the one with the bust in it better than
> >the "correct" one.
>
> At 11:03 AM -0500 6/3/00, Clyde Lee wrote:
>
> >Here is an indicator that I wrote using his ideas.
> >Note that I did a bit of flipping for display purposes.
> >I'm not bothering with  .ela   since this is so simple.
> >
> >Avg = Average(c,Length);
> >
> >RMS = 0;
> >for value1=0 to length-1 begin
> >  rms=rms+c*c;
> >end;
> >rms=SQUAREROOT(rms/length);
> >
> >Entropy=(Avg/iff(rms<>0,rms,.001)+1)*.5;
> >
> >Value1=-(Entropy-1);
> >
> >if Value1>0 then
> > Plot1(Value1,"-ent")
> >else
> >  Plot2(Value1,"+ent");
> >
> > Plot3(0,"0");
>
> Trying to figure out what this does, I think it reduces to the
following:
>
> rms = length * C * C
> rms = SQUAREROOT(length * C * C / length);
> rms = C
>
> Entropy = (Avg/C + 1) * 0.5 = 0.5 * Ave / C + 0.5
> Value1 = -(Entropy - 1) = -(0.5 * Ave / C - 0.5) = - 0.5 * (Ave / C -
1)
> Value1 = (C - Ave) / (2 * C)
>
> Did I do this correctly?
>
> Bob Fulks
>
>