楼主: lz8228988
1014 0

[问答] 求高手帮忙看下程序的问题出在哪儿 [推广有奖]

  • 0关注
  • 0粉丝

已卖:425份资源

大专生

23%

还不是VIP/贵宾

-

威望
0
论坛币
1254 个
通用积分
0.2400
学术水平
0 点
热心指数
1 点
信用等级
0 点
经验
291 点
帖子
43
精华
0
在线时间
38 小时
注册时间
2008-12-27
最后登录
2015-5-4

楼主
lz8228988 发表于 2015-2-27 16:24:16 |AI写论文
20论坛币
是一个期权定价公式的程序,总是各种报错。麻烦高手指导

function d=d_param1(C,B,K,r,sigma,T,tau)
         a=log((C-B)/K);
         b=(r+sigma^2/2);
         d=(a+b*(T-tau))/(sigma*sqrt(T-tau));
function d=d_param2(C,B,K,r,sigma,T,tau)
         a=log((C-B)/K);
         b=(r-sigma^2/2);
         d=(a+b*(T-tau))/(sigma*sqrt(T-tau));
function N=norm_int(d)
%syms y;
       N=0;
       int_low=-10000;
       int_up=d;
       n=10000;
       dy=(d-int_low)/n
       Ay=int_low:dy:int_up;
       for i=1:n
           y=Ay(i)+dy/2;
           N=N+1/sqrt(2*pi)*exp(-y^2/2)*dy;
       end
function price=F_make_price(st,K,C,B,r,sigma,T,t)
price=0.0;
int_low=t;
int_up=T;
n=10000;
dtau=(int_up-int_low)/n;
Atau=int_low;dtau:int_up;
        for i=1:n
            tau=Atau(i)+dtau/2;
            price=price+(exp(-r*(tau-t))*((C-B)*norm_int(d_param1(C,B,K,r,sigma,T,tau))-K*exp(-r*(T-tau))*norm_int(d_param2(C,B,r,sigma,T,tau))) *...log((C-B)/st)*(2*pi*sigma^2*(tau-t)^3)^(-0.5)*...
        exp(-(log((C-B)/st)+(r-sigma^2/2)*(tau-t)^2/(2*sigma^2*(tau-t))))*dtau)
    end;




关键词:求高手 function Sigma Price Rice function sigma 程序

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-29 20:20