Vestics Beleggers Netwerk

Doet bij iemand deze LinReg Indicator het?


Paul

Wat bedoel je met 'of tie het doet'? Of tie in te voegen is (ja, bij mij wel). Of bedoel je iets anders?

Groet
Hannie

Beste Hannie,

Bij mij doet ie het niet, ik bedoel ik zie geen plot.
Ik vroeg me af of meerdere dit hadden, en/of de functie LinRegValue wel werkt?
Zo niet dan ligt het bij mij.

Paul

Beste Paul,
Ik weet niet of je dat gezien hebt, maar er is al eerder iets ?over de LinReg op het forum geweest (zie handelssystemen/indicatoren/opgestart 29012003).
Aad

Beste Aad,

Die had ik nog niet gezien, ik had wel -zoeken- gedaan maar gaf geen resultaat.
Hij is dus nog niet geupdate, waar Eppo het over had.
Bedankt voot de reactie.

Paul

Paul

Misschien kan dit je helpen ;

FUNCTIE ?:

value function zLinearRegValue (value xSeries[],value xNumberOfBars,value xWhichBar) begin

?value xI, xSumX,xSumX2, xNumX=0;
?if xNumberOfBars<>xNumX then begin
? ?xNumX := xNumberOfBars; ?xSumX := 0; ?xSumX2 := 0;
? ?for xI := 0 to xNumX-1 begin
? ? ?xSumX := xSumX+xI; ? ?
? ? ?xSumX2 := xSumX2+xI*xI; ? ?
? ? ?end;
? ?end;

?value xY, xSumY, xSumY2, xSumXY;
?xSumY := 0; ? ? xSumY2 := 0; ? ?xSumXY := 0;
?for xI := 0 to xNumX-1 begin
? ?xY := xSeries[xI];
? ?xSumY := xSumY+xY;
? ?xSumY2 := xSumY2+xY*xY;
? ?xSumXY := xSumXY+xI*xY;
? ?end; ? ?

?value xB2, xBeta, xAlpha;
?xB2 := xNumX*xSumX2-xSumX*xSumX;
?if xB2=0 then xB2 := 0.0001;
?xBeta := (xNumX*xSumXY-xSumX*xSumY)/xB2;
?xAlpha := (xSumY-xBeta*xSumX)/xNumX;
?zLinearRegValue := xAlpha+xBeta*xWhichBar;
end;

INDICATOR ? :

value function zLinearReg (value xSeries[]=Close,value xNumberOfBars=20) begin
?value xLinearReg;
?xLinearReg := zLinearRegValue(xSeries,xNumberOfBars,0);
?Plot1(xLinearReg,'LinReg'+NumToStr(xNumberOfBars));
?end;

JOHAN M

Hallo Johan,

Bedankt voor de reactie, hij doet het.

Paul

ik heb bovenstaande code gekipt en geplakt maar krijg een foutmelding, fout 37 ''verwacht een = ?teken'' bij Functie ;

Wat is er aan de hand ?