基本信息
源码名称:求螺旋桨推力系数(KT2.m)
源码大小:2.00KB
文件格式:.m
开发语言:MATLAB
更新时间:2021-02-22
   友情提示:(无需注册或充值,赞助后即可获取资源下载链接)

     嘿,亲!知识可是无价之宝呢,但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下,绝对物超所值哦!如有下载和支付问题,请联系我们QQ(微信同号):78630559

本次赞助数额为: 2 元 
   源码介绍


function kt = KT2(J, PD, AEAO)
	conn = database("Propdb","aaa","123456");
    cursor1 = exec(conn, "select * from MAU4_40KT");
    result = fetch(cursor1);
    temp = result.Data;
    mau4_40_pd_value =cell2mat(temp(:,5));
    mau4_40_pd_value=mau4_40_pd_value(end:-1:1);
    MAU4_40KT =cell2mat(temp(:,7:2:end));
    MAU4_40KT(find(isnan(MAU4_40KT)==1))= 0;
    close(cursor1);
    cursor2 = exec(conn, "select * from MAU4_55KT");
    result = fetch(cursor2);
    temp = result.Data;
    mau4_55_pd_value =cell2mat(temp(:,5));
    mau4_55_pd_value=mau4_55_pd_value(end:-1:1);
    MAU4_55KT =cell2mat(temp(:,7:2:end));
    MAU4_55KT(find(isnan(MAU4_55KT)==1))= 0;
    close(cursor2);   
    cursor3 = exec(conn, "select * from MAU4_70KT");
    result = fetch(cursor3);
    temp = result.Data;
    mau4_70_pd_value =cell2mat(temp(:,5));
    mau4_70_pd_value=mau4_70_pd_value(end:-1:1);
    MAU4_70KT =cell2mat(temp(:,7:2:end));
    MAU4_70KT(find(isnan(MAU4_70KT)==1))= 0;
    close(cursor3);  
    close(conn);		
    [c40,r40] = size(MAU4_40KT);
    z1 = [];
    z2 = [];
    z3 = [];
    for i=1:c40
        z1(c40 1-i,:) = MAU4_40KT(i,:);
    end
    [c55,r55] = size(MAU4_55KT);
    for i=1:c55
        
        z2(c55 1-i,:) = MAU4_55KT(i,:);
    end
    [c70,r70] = size(MAU4_70KT);
    for i=1:c70
        
        z3(c55 1-i,:) = MAU4_70KT(i,:);
    end
    
    x_kt40 = 0:0.1:0.1*(r40-1);
    Kt40=[];
    for i=1:c40
        Kt40(i) = interp1(x_kt40,z1(i,:),J);
    end
    KT40_res = interp1(mau4_40_pd_value,Kt40,PD);
    x_kt55 = 0:0.1:0.1*(r55-1);
    Kt55=[];
    for i=1:c55
        Kt55(i) = interp1(x_kt55,z2(i,:),J);
    end
    KT55_res = interp1(mau4_55_pd_value,Kt55,PD);
    x_kt70 = 0:0.1:0.1*(r70-1);
    Kt70=[];
    for i=1:c70
        Kt70(i) = interp1(x_kt70,z3(i,:),J);
    end
    KT70_res = interp1(mau4_70_pd_value,Kt70,PD);
    AE = [0.4,0.55,0.7];
    tempres = interp1(AE,[KT40_res,KT55_res,KT70_res],AEAO);

    kt = tempres;
 
    
end