随心做的，一个组合收益和风险的Gui，改编自离歌版主的例子

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

主程序如下：

1. %  制作投资组合与相关系数的一个简单的gui
   
2. %  参数的变化主要在相关系数的变化
   
3. %  参数的设置为-1到1
   
4. %  copyright by fantuanxiaot
   
5. clc
   
6. clear all
   
7. close all
   
8. figure(1)
   
9. %  作图的各类省略参数的设置
   
10. %  default是省略的参数的设置
    
11. set(figure(1),'unit','normalized','position',[0.2,0.1,0.64,0.75],...
    
12.     'color',[0.5 1 1],'defaultuicontrolunits','normalized',...
    
13.     'defaultuicontrolfontsize',12,'defaultuicontrolhorizontal','left',...
    
14.     'defaultuicontrolfontname','Times New Roman','name',...
    
15.     'portfolio theory: relation between expected return and deviation',...
    
16.     'numbertitle','off');
    
17. %  坐标轴的各类参数的设置
    
18. axes_1=axes('unit','normalized','position',[0.3,0.1,0.65,0.85],...
    
19.     'xlim',[0 1],'ylim',[-1 1],'xcolor','b','ycolor','b',...
    
20.     'fontname','Times New Roman','fontsize',12);
    
21. %  基础的参数设置
    
22. base_correlation=0;
    
23. %  两个组合
    
24. return_1=0.15;
    
25. std_1=0.24;
    
26. return_2=0.12;
    
27. std_2=0.18;
    
28. portfolio_return=[];
    
29. portfolio_std=[];
    
30. %  组合的设置
    
31. w1=linspace(0,1,50);
    
32. w2=-w1+1;
    
33. portfolio_return=[w1;w2]'*[return_1;return_2];
    
34. for i=1:50
    
35.     std=sqrt(w1(i)^2*std_1^2+w2(i)^2*std_2^2+...
    
36.         2*base_correlation*w1(i)*w2(i)*std_1*std_2);
    
37.     portfolio_std=[portfolio_std std];
    
38. end
    
39. portfolio_std=portfolio_std';
    
40. plot_1=plot(portfolio_std,portfolio_return,'mp-','markerfacecolor',...
    
41.     'm','markeredgecolor','k','markersize',10,...
    
42.     'color','b','linewidth',1);
    
43. %  标记一个说明
    
44. control_text=uicontrol(figure(1),'style','text','position',...
    
45.     [0.02,0.9,0.22,0.05],'string',['Correlation=',num2str(base_correlation)],...
    
46.     'fontsize',14);
    
47. another_text_1=uicontrol(figure(1),'style','text','position',...
    
48.     [0.02,0.81,0.22,0.08],'string','Make a Choice from -1 to 1',...
    
49.     'fontsize',14);
    
50. another_text_2=uicontrol(figure(1),'style','text','position',...
    
51.     [0.02,0.3,0.22,0.08],'string','Point Choice',...
    
52.     'fontsize',14);
    
53. %  两个按键
    
54. control_push_1=uicontrol(figure(1),'style','push',...
    
55.     'position',[0.02,0.54,0.22,0.1],'string','Grid on Yellow on',...
    
56.     'callback',['grid on,','set(gca,''color'',''y'')']);
    
57. control_push_2=uicontrol(figure(1),'style','push',...
    
58.     'position',[0.02,0.43,0.22,0.1],'string','Grid off Yellow off',...
    
59.     'callback',['grid off,','set(gca,''color'',''w'')']);
    
60. %  相关系数的滑条设置
    
61. control_slider=uicontrol(figure(1),'style','slider','position',...
    
62.     [0.02,0.65,0.22,0.15],'max',1,'min',-1,'sliderstep',...
    
63.     [0.1,0.1],'value',base_correlation);
    
64. set(control_slider,'callback',['choice=get(gcbo,''value'');',...
    
65.     'plot_1=portfolio_gui_plot(choice);']);
    
66. %  几个不同的组合形状
    
67. point_1=uicontrol(figure(1),'style','radio','string','triangle',...
    
68.     'position',[0.02 0.24 0.15 0.05]);
    
69. set(point_1,'value',get(point_1,'Max'));
    
70. point_2=uicontrol(figure(1),'style','radio','string','round',...
    
71.     'position',[0.02 0.18 0.15 0.05]);
    
72. set(point_2,'value',get(point_2,'Min'));
    
73. point_3=uicontrol(figure(1),'style','radio','string','square',...
    
74.     'position',[0.02 0.12 0.15 0.05]);
    
75. set(point_3,'value',get(point_3,'Min'));
    
76. set(point_1,'callback',[...
    
77.     'set(point_1,''value'',get(point_1,''Max''));',...
    
78.     'set(point_2,''value'',get(point_2,''Min''));',...
    
79.     'set(point_3,''value'',get(point_3,''Min''));',...
    
80.     'set(plot_1,''marker'',''v'');']);
    
81. set(point_2,'callback',[...
    
82.     'set(point_1,''value'',get(point_1,''Min''));',...
    
83.     'set(point_2,''value'',get(point_2,''Max''));',...
    
84.     'set(point_3,''value'',get(point_3,''Min''));',...
    
85.     'set(plot_1,''marker'',''o'');']);
    
86. set(point_3,'callback',[...
    
87.     'set(point_1,''value'',get(point_1,''Min''));',...
    
88.     'set(point_2,''value'',get(point_2,''Min''));',...
    
89.     'set(point_3,''value'',get(point_3,''Max''));',...
    
90.     'set(plot_1,''marker'',''s'');']);

复制代码

所要用到的一个函数如下：

本帖隐藏的内容

1. function plot_1=portfolio_gui_plot(correlation)
   
2. %  copyright by fantuanxiaot
   
3. %  组合的其他系数
   
4. %  两个组合
   
5. control_text=uicontrol(figure(1),'style','text','position',...
   
6.     [0.02,0.9,0.22,0.05],'string',['Correlation=',num2str(correlation)],...
   
7.     'fontsize',14);
   
8. return_1=0.15;
   
9. std_1=0.24;
   
10. return_2=0.12;
    
11. std_2=0.18;
    
12. portfolio_return=[];
    
13. portfolio_std=[];
    
14. %  组合的设置
    
15. w1=linspace(0,1,50);
    
16. w2=-w1+1;
    
17. portfolio_return=[w1;w2]'*[return_1;return_2];
    
18. for i=1:50
    
19.     std=sqrt(w1(i)^2*std_1^2+w2(i)^2*std_2^2+...
    
20.         2*correlation*w1(i)*w2(i)*std_1*std_2);
    
21.     portfolio_std=[portfolio_std std];
    
22. end
    
23. portfolio_std=portfolio_std';
    
24. plot_1=plot(portfolio_std,portfolio_return,'mp-','markerfacecolor',...
    
25.     'm','markeredgecolor','k','markersize',10,...
    
26.     'color','b','linewidth',1);
    
27. end

复制代码

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：GUI fantuanxiaot correlation horizontal Portfolio 收益

来顶一个！

谢谢分享

这是用Matlab做的吗

感谢楼主分享

果然牛人

离歌レ笑 发表于 2014-12-6 20:43
果然牛人

小的菜鸟一个 不足挂齿

感谢LZ，楼主不要谦虚，真的好厉害啊

支持!!!!

学习学习！