三对角线方程组追赶法

function x=chasing_method(A,d)
    %{
        追赶法,适用于三对角线矩阵
        param A:三对角线矩阵
        param d:该求解的列向量
        return x:解向量
    %}
    rows=size(A,1);

    [x,y,b,c]=deal(zeros(rows,1));

    %先确定b,c,y的值
    b(1)=A(1,1);
    y(1)=d(1)/b(1);

    for ii=2:rows
        c(ii)=A(ii-1,ii)/b(ii-1);
        b(ii)=A(ii,ii)-A(ii,ii-1)*c(ii);

        y(ii)=(d(ii)-A(ii,ii-1)*y(ii-1))/b(ii);
    end
    
    % %确定y的值
    % y(1)=d(1)/b(1);
    % for ii=2:rows
    %     y(ii)=(d(ii)-A(ii,ii-1)*y(ii-1))/b(ii);
    % end

    %确定x的值
    x(rows)=y(rows);
    for ii=rows-1:-1:1
        x(ii)=y(ii)-c(ii+1)*x(ii+1);
    end
end
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值