When using an average, it does not necessarily mean that the average is also the middle value (the median)…
The number of values above or below the average does not have to be equal…
The code below first calculates the average, then determines how many values are above or below that average…
Based on this, the “HighAvg” and “LowAvg” are calculated…
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
N=10 HigherSum=0 HNumber=0 LowerSum=0 LNumber=0 xAverage=Average[N](Close) For i=0 to N-1 If Close[i]>xAverage then HigherSum=HigherSum+Close[i] HNumber=HNumber+1 ElsIf Close[i]<xAverage then LowerSum=LowerSum+Close[i] LNumber=LNumber+1 EndIf Next HighAvg=HigherSum/HNumber LowAvg=LowerSum/LNumber Return xAverage as "Average"Coloured("Yellow"),HighAvg as "HighAvg" Coloured("Green"),LowAvg as "LowAvg" Coloured("Red") |
