以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  如何找出数组中与其他值之差<0.02的次数最多的那个值?  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=67067)

--  作者:yanxc
--  发布时间:2014/7/7 15:34:52
--  如何找出数组中与其他值之差<0.02的次数最多的那个值?

斜率:=(H-ref(H,1))/ref(H1,1);

前N天的斜率形成一个长度为N的数组,比如按IF日线,就是0.0060, 0.0042, 0.0048, 0.0018, -0.0022, 0.0066

 

现在想遍历数组中每个值与其它值的差,然后找出差<0.002的次数最多的那个值。

比如0.0048,就和其中3个数的差都小于0.002,因此就选出0.0060, 0.0042, 0.0048, 0.0066这4个次数都为3的值,求得它们的平均数为当前斜率。

而0.0018, -0.0022因为骗离其它值太远,就被抛弃了。

 

现在有简单的函数或算法,来实现这个目标吗?


--  作者:yanxc
--  发布时间:2014/7/7 15:35:03
--  

这样写 好象不行

 

斜率:=(H-ref(H,1))/ref(H1,1);

variable:ss=0,kk=0;
variable:A[5]=0;
hh:=斜率;
A[1]:=ref(hh,1);
A[2]:=ref(hh,2);
A[3]:=ref(hh,3);
A[4]:=ref(hh,4);
A[5]:=ref(hh,5);

斜率差:=0.002;
if count((hh-A)<=斜率差,6)>=4 then begin
      ss:=ss+hh;
      kk:=kk+1;
      end
if count((A[1]-A)<=斜率差,6)>=4 then begin
      ss:=ss+A[1];
      kk:=kk+1;
      end
if count((A[2]-A)<=斜率差,6)>=4 then begin
      ss:=ss+A[2];
      kk:=kk+1;
      end
if count((A[3]-A)<=斜率差,6)>=4 then begin
      ss:=ss+A[3];
      kk:=kk+1;
      end
if count((A[4]-A)<=斜率差,6)>=4 then begin
      ss:=ss+A[4];
      kk:=kk+1;
      end
if count((A[5]-A)<=斜率差,6)>=4 then begin
      ss:=ss+A[5];
      kk:=kk+1;
      end


当前斜率:ss/kk,colorgreen;


--  作者:王锋
--  发布时间:2014/7/7 18:04:35
--  

你的需求过于复杂, 无法用简单的函数实现.

建议你还是多学习金字塔的单步跟踪调试吧, 逻辑复杂,殊无法帮你编写