您現在的位置:程序化交易>> 期貨公式>> 金字塔等>> 其他期貨軟件知識>>正文內容

[求助]Fun 對象中有無相關系數的函數 [金字塔]

  • 咨詢內容:

    兩個品種收盤價數組

    求這兩個品種的相關系數

    Fun 對象中有無相關系數的函數

    如無

     

    能否請老大編個簡單函數示范一下,如何算相關系數

     

     

     r=\frac{\sigma{xy}}{\sigma_x\sigma_y}  (1)

      \sigma{xy}=\sigma^2{xy}=\frac{\sum(x-\overline{x})(y-\overline{y})}{n}

      \sigma_x=\sqrt{\frac{\sum(x-\overline{x})^2}{n}}

      \sigma_y=\sqrt{\frac{\sum(y-\overline{y}^2)}{n}}

      r=\frac{\sum(x-\overline{x})(y-\overline{y})}{\sqrt{\sum(x-\overline{x})^2\sum(y-\overline{y})^2}}  (2)

      =\frac{n\sum xy-\sum x\sum y}{\sqrt{n\sum x^2-(\sum x)^2}\cdot\sqrt{n\sum y^2-(\sum y)^2}}  (3)

      =\frac{n^2[\frac{\sum xy}{n}-]}{\frac{\sum x}{n}-\frac{\sum y}{n}}{\sqrt{n^2[\frac{\sum x^2}{n}-(\frac{\sum x}{n})^2]\cdot\sqrt n^2[\frac{\sum y^2}{n}-(\frac{\sum y}{n})^2]}}  (4)

      =\frac{\overline{xy}-\overline{x}\overline{y}}{\sqrt{\sum\overline{x^2}-(\overline{x})^2}\cdot\sqrt{\sum\overline{y^2}-(\overline{y})^2}}  (5)

     

  • 金字塔客服: 好像沒有,后面準備增加

     

  • 用戶回復: 檢查了下軟件,目前VBA是自帶相關系數的,請參考外部對象的Array 對象,Releate      計算該數組與其他Array對象之間的相關系數

     

  • 網友回復:

    Sub Test()

    Dim d1 '創建一個變量
    '創建Array外部對象,將對象實例置變量d中
    Set d1 = CreateObject("Stock.Array")

    Set Data1 = MarketData.GetHistoryData("IF07","ZJ",5)
    If Data1.Count < 10 Then
       Set d1 = nothing '釋放對象
       Exit Sub
    End if

    '由于GetHistoryData只能返回一個HistoryData對象,因此需要這里讀出一個保存一個到數組中

    '取最近10個交易日的數據做相關系數判斷
    '將收盤價數據置數組中
    For i =1 to 10
       d1.AddBack(Data1.Close(Data1.Count-i))
    Next

    Dim d2 '創建一個變量
    '創建Array外部對象,將對象實例置變量d中
    Set d2 = CreateObject("Stock.Array")

    Set Data2 = MarketData.GetHistoryData("IF09","ZJ",5)
    If Data2.Count < 10 Then
       Set d1 = nothing '釋放對象
       Set d2 = nothing
       Exit Sub
    End if

    For i =1 to 10
       d2.AddBack(Data2.Close(Data2.Count-i))
    Next

    Application.MsgOut d1.count

    MsgBox d1.Releate(d2)

     

    Set d1 = nothing '釋放對象
    Set d2 = nothing

    End Sub

    [此貼子已經被作者于2012-6-28 12:39:26編輯過]

 

如果以上指標公式不適用于您常用的行情軟件

或者您想改編成選股公式,以便快速選出某種形態個股的話,

可以聯系我們相關技術人員 QQ: 262069696  點擊在線交流進行 有償 改編!

 


【字體: 】【打印文章】【查看評論

相關文章

    沒有相關內容
主站蜘蛛池模板: 59pao成国产成视频永久免费| 久久发布国产伦子伦精品| 粗大挺进朋友孕妇| 国产又黄又爽视频| 香蕉在线精品一区二区| 夜夜高潮天天爽欧美| 东方aⅴ免费观看久久av| 日韩av第一页在线播放| 亚洲一区二区免费视频| 欧美精品一区二区三区在线 | 一本伊在人香蕉线观新在线| 日本a级片免费看| 久久精品国产大片免费观看| 欧美人禽猛交乱配| 亚洲欧洲精品成人久久曰| 狠狠97人人婷婷五月| 免费精品99久久国产综合精品| 美女色又黄一级毛片| 国产一区二区三区影院| 触手怪入侵男生下面bl的漫画| 国产在线麻豆精品观看| 国产四虎免费精品视频| 国产真实伦在线视频免费观看| 24小时免费看片| 国产网站免费观看| 97精品国产97久久久久久免费 | 欧美xxxxx在线观看| 亚洲欧美国产精品专区久久| 波多野结衣bd| 亚洲综合小视频| 特黄特黄aaaa级毛片免费看| 伊人色综合久久天天人手人婷| 精品人妻无码专区中文字幕| 北条麻妃中文字幕在线观看| 精品女同一区二区三区免费播放| 嗯嗯在线观看免费播放| 老司机天堂影院| 啊灬啊别停灬用力啊岳| 美女又黄又免费的视频| 啊灬啊灬啊灬快灬深用力点| 美女免费视频一区二区|