三角高程控制网平差

使用matlab编写三角高程控制网平差代码，数据的格式为原始的天宝数据格式。

function [ptTab]=cellToptTab（v）
[r2c2]=size（v）;
tem=zeros（r2c2）;
 num=length（v）;
for ii=1:num
   hd（ii）=str2double（v{ii2}）;
end
for i=1:r2
    ptname1=hd（1i）;
    for j=1:r2
    while tem（j1）==ptname1
        break
    end
    end
        for i=1:r2
            if tem（i1）==0
                tem（i1）=hd（1i）
            end
    end
end
tem=unique（tem）;
[r3c3]=size（tem）;
ptTab=zeros（r3-13）;
for i=1:r3-1
    ptTab（i1）=tem（i+11）
end
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        472  2018-05-24 17:13  三角高程控制网平差 - 副本\cellToptTab.m

     文件        893  2018-05-24 19:02  三角高程控制网平差 - 副本\geth.m

     文件        909  2018-05-24 19:12  三角高程控制网平差 - 副本\getV1.m

     文件        198  2018-05-22 17:43  三角高程控制网平差 - 副本\get_Char.m

     文件       1106  2018-05-24 19:09  三角高程控制网平差 - 副本\loadSUR_Data.m

     文件       1091  2018-05-24 18:31  三角高程控制网平差 - 副本\main.m

     文件        161  2007-03-17 23:32  三角高程控制网平差 - 副本\nameToindex.m

     文件        297  2018-05-24 18:30  三角高程控制网平差 - 副本\readcontroldata.m

     目录          0  2018-11-30 11:11  三角高程控制网平差 - 副本

----------- ---------  ---------- -----  ----

                 5127                    9