水准网条件平差matlab编程的m文件

file=uigetfile（‘*.txt‘‘select a file for open‘）;%指定文件路径  运行到这步就会提示选择一个.txt文件
fid=fopen（file‘r‘）;%以只读方式打开文件
k=[];%建立一个空矩阵A用来存放读取的数据
i=1;%i用于记录读到第几行，初始为1
while ~feof（fid）%判断是否到文件尾  feof（fid）表示文件指针 fid 到达文件末尾时返回“真”值；否则返回“假”
    str=fgetl（fid）;%提取文件里的一行数据（整行）
if i>1%从第二行开始读取
    str=str2num（str）;%将读取的字符转换为数值格式
    k=[k;str];%把读取的内容存入矩阵k
end
i=i+1;
end
Ha=5