通过MATLAB获取中金所每日结算会员成交持仓排名

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

原帖地址:通过MATLAB获取中金所每日结算会员成交持仓排名
http://www.matlabsky.com/thread-39817-1-1.html


===============================

中金所每日会公布结算会员（前20名）成交持仓排名，数据网址：http://www.cffex.com.cn/fzjy/ccpm/，利用MATLAB可以自动获取每日该数据，进而可以为后续的使用和挖掘做准备。

正则是个好东西！


实现核心就是urlread+正则。核心代码还在修改调整，暂未放出。

脚本代码（核心函数还未给出！）

1. %% TestScript
   
2. % by LiYang
   
3. % Email:farutoliyang@gmail.com
   
4. % 2014/01/10
   
5. 
   
6. %% A Little Clean Work
   
7. tic;
   
8. clear;
   
9. clc;
   
10. close all;
    
11. format compact;
    
12. %% 获取中金所每日结算会员成交持仓排名 数据
    
13. % 获取数据网址http://www.cffex.com.cn/fzjy/ccpm/
    
14. 
    
15. datestring = '2014-01-10';
    
16. % datestring = '2010-04-16';
    
17. % datestring = '2013-10-17';
    
18. 
    
19. [DataCell,StatusOut] = VolOIRankingGet_SD(datestring);
    
20. StatusOut
    
21. 
    
22. if 0 == StatusOut
    
23.     disp('数据获取失败！请检查！');
    
24.     return;
    
25. end
    
26. %%
    
27. num = length(DataCell);
    
28. 
    
29. %% 图形展示
    
30. 
    
31. for i = 1:num
    
32.    
    
33.     celltemp = DataCell{i,1};
    
34.     id_day_string = celltemp{1,1};
    
35.    
    
36.     xlabel1 = celltemp(4:end,2);
    
37.     Vol = celltemp(4:end,3);
    
38.     Vol = cell2mat(Vol);
    
39.     Vol_chg = celltemp(4:end,4);
    
40.     Vol_chg = cell2mat(Vol_chg);
    
41.    
    
42.     xlabel2 = celltemp(4:end,5);
    
43.     OI_buy = celltemp(4:end,6);
    
44.     OI_buy = cell2mat(OI_buy);
    
45.     OI_buy_chg = celltemp(4:end,7);
    
46.     OI_buy_chg = cell2mat(OI_buy_chg);
    
47.    
    
48.     xlabel3 = celltemp(4:end,8);
    
49.     OI_sell = celltemp(4:end,9);
    
50.     OI_sell = cell2mat(OI_sell);
    
51.     OI_sell_chg = celltemp(4:end,10);
    
52.     OI_sell_chg = cell2mat(OI_sell_chg);   
    
53.    
    
54.    
    
55.     scrsz = get(0,'ScreenSize');
    
56.     figure('Position',[scrsz(3)*1/5 scrsz(4)*1/7 scrsz(3)*6/6 scrsz(4)]*3/4);
    
57.    
    
58.     subplot(311);
    
59.     x = (1:20)';
    
60.     [AX,H1,H2] = plotyy(x,Vol,x,Vol_chg,@bar,@plot);
    
61.     set( AX(1),'XTick',[] );
    
62.     set( AX(1),'XTickLabel',[] );   
    
63.     set( AX(2),'XTick',[] );
    
64.     set( AX(2),'XTickLabel',[] );
    
65.     xlim( AX(1),[0 21] );
    
66.     xlim( AX(2),[0 21] );
    
67.    
    
68.     set(H2,'Color','r');
    
69.     set(AX(2),'YColor','r');
    
70.    
    
71.     set(get(AX(1),'Ylabel'),'String','成交量','FontWeight','Bold');
    
72.     set(get(AX(2),'Ylabel'),'String','比上交易日增减');
    
73.    
    
74.     set(gca,'XTick',1:20);
    
75.     set(gca,'XTickLabel',xlabel1);
    
76.     TickLabelRotate(gca,'x',30,'right');
    
77.    
    
78.     str = ['成交量排名(',id_day_string,')'];
    
79.     title(str, 'FontWeight','Bold');
    
80.    
    
81.     for ind=1:length(Vol)
    
82.         text(ind,Vol(ind),num2str(Vol(ind)), ...
    
83.             'HorizontalAlignment', 'center', 'VerticalAlignment', 'bottom');
    
84.     end
    
85.    
    
86.     subplot(312);
    
87.     x = (1:20)';
    
88.     [AX,H1,H2] = plotyy(x,OI_buy,x,OI_buy_chg,@bar,@plot);
    
89.     set( AX(1),'XTick',[] );
    
90.     set( AX(1),'XTickLabel',[] );   
    
91.     set( AX(2),'XTick',[] );
    
92.     set( AX(2),'XTickLabel',[] );
    
93.     xlim( AX(1),[0 21] );
    
94.     xlim( AX(2),[0 21] );
    
95.    
    
96.     set(H2,'Color','r');
    
97.     set(AX(2),'YColor','r');
    
98.    
    
99.     set(get(AX(1),'Ylabel'),'String','持买单量','FontWeight','Bold');
    
100.     set(get(AX(2),'Ylabel'),'String','比上交易日增减');
     
101.    
     
102.     set(gca,'XTick',1:20);
     
103.     set(gca,'XTickLabel',xlabel2);
     
104.     TickLabelRotate(gca,'x',30,'right');
     
105.    
     
106.     str = ['持买单量排名(',id_day_string,')'];
     
107.     title(str, 'FontWeight','Bold');  
     
108.    
     
109.     for ind=1:length(Vol)
     
110.         text(ind,OI_buy(ind),num2str(OI_buy(ind)), ...
     
111.             'HorizontalAlignment', 'center', 'VerticalAlignment', 'bottom');
     
112.     end   
     
113.    
     
114.     subplot(313);
     
115.     x = (1:20)';
     
116.     [AX,H1,H2] = plotyy(x,OI_sell,x,OI_sell_chg,@bar,@plot);
     
117.     set( AX(1),'XTick',[] );
     
118.     set( AX(1),'XTickLabel',[] );   
     
119.     set( AX(2),'XTick',[] );
     
120.     set( AX(2),'XTickLabel',[] );
     
121.     xlim( AX(1),[0 21] );
     
122.     xlim( AX(2),[0 21] );
     
123.    
     
124.     set(H2,'Color','r');
     
125.     set(AX(2),'YColor','r');
     
126.    
     
127.     set(get(AX(1),'Ylabel'),'String','持卖单量','FontWeight','Bold');
     
128.     set(get(AX(2),'Ylabel'),'String','比上交易日增减');
     
129.    
     
130.     set(gca,'XTick',1:20);
     
131.     set(gca,'XTickLabel',xlabel3);
     
132.     TickLabelRotate(gca,'x',30,'right');
     
133.    
     
134.     str = ['持卖单量排名(',id_day_string,')'];
     
135.     title(str, 'FontWeight','Bold');  
     
136.    
     
137.     for ind=1:length(Vol)
     
138.         text(ind,OI_sell(ind),num2str(OI_sell(ind)), ...
     
139.             'HorizontalAlignment', 'center', 'VerticalAlignment', 'bottom');
     
140.     end   
     
141.    
     
142.     text( 'Units', 'normalized', 'Position', [1,-0.35], 'String', '数据来源：中金所', ...
     
143.      'BackgroundColor', [1 0 0], 'FontAngle', 'oblique', ...
     
144.      'HorizontalAlignment', 'right', 'VerticalAlignment', 'top');
     
145. end
     
146. 
     
147. 
     
148. %% Record Time
     
149. toc;

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享2 收藏9 回帖

关键词：MATLAB matla atlab Mat Lab Email 会员

赞一个~

牛~~

欢迎常来量化投资版块发帖、讨论与交流！祝好！

玄霄 发表于 2014-2-25 12:31
欢迎常来量化投资版块发帖、讨论与交流！祝好！

会常来的。来这里和大家交流学习~

VolOIRankingGet_SD是啥？？总是运行不了

赞一个，楼主。

很不错的想法。求代码、函数。


看看能R或octave里实现一下，
hqxavier1984#163.com

eastpeace 发表于 2015-5-11 17:10
赞一个，楼主。

很不错的想法。求代码、函数。