matlab导线平差程序,【求助】闭合导线简易平差Matlab代码需要大神帮忙

该楼层疑似违规已被系统折叠隐藏此楼查看此楼

%观测数据的输入

n=input('请输入闭合导线的点数：');

for i=1:n %按边数进行循环

a=num2str(i); %数字转换为字符串

string1=(char(('请输入第')',a,('条导线的边长:')'))';

bian(i)=input(string1);

b=num2str(i);

string2=(char(('请输入第')',b,('个转折角:')'))';

jiao1=input(string2,'s');

c=jiao1;

du=str2num(c(1:3));

fen=str2num(c(4:5));

miao=str2num(c(6:7));

jiao2(i)=du+fen/60+miao/3600;

end

%起算数据的输入

x=input('请输入起始已知点x的坐标:');

y=input('请输入起始已知点y的坐标:');

string3=(char('请输入起始已知方向的起算方位角：'));

fwj1=input(string3,'s');

c=fwj1;

du=str2num(c(1:3));

fen=str2num(c(4:5));

miao=str2num(c(6:7));

fwj2=du+fen/60+miao/3600;

%角度闭合差的计算

fb=sum(jiao2)-(n-2)*180;

for i=1:n

v(i)=(-1)*fb/n;

end

%真方位角计算

for i=1:n

if i==1

fwjz(1)=fwj2+jiao2(1)+v(1)-180;

end

if i>1

fwjz(i)=fwjz(i-1)+jiao2(i)+v(i)-180;

end

if fwjz(i)>0

fwjz1(i)=fwjz(i);

end

if fwjz(i)<0

fwjz1(i)=fwjz(i)+360;

end

%坐标闭合差计算

xzq=cosd(fwj2)*bian(1);

yzq=sind(fwj2)*bian(1);

for i=1:(n-1)

xz(i)=cosd(fwjz1(i))*bian(i+1);

yz(i)=sind(fwjz1(i))*bian(i+1);

end

fx=xzq+sum(xz);

fy=yzq+sum(yz);

fs=sqrt(fx^2+fy^2);

k=fs/sum(bian);

%坐标计算

for i=1:n

vx=(-1)*fx/sum(bian)*bian;

vy=(-1)*fy/sum(bian)*bian;

end

for i=1:n

if i==1

X(1)=x+xzq+vx(1);

Y(1)=y+yzq+vy(1);

end

if i>1

X(i)=X(i-1)+xz(i-1)+vx(i);

Y(i)=Y(i-1)+yz(i-1)+vy(i);

end

matlab导线平差程序,【求助】闭合导线简易平差Matlab代码需要大神帮忙相关推荐

matlab程序闭合导线网程序,【求助】闭合导线简易平差Matlab代码需要大神帮忙
该楼层疑似违规已被系统折叠隐藏此楼查看此楼 %观测数据的输入 n=input('请输入闭合导线的点数:'); for i=1:n %按边数进行循环 a=num2str(i); %数字转换为字符串 s ...
秒表c语言程序代码,求大神帮忙写一篇简单的C语言秒表程序，谢谢。
该楼层疑似违规已被系统折叠隐藏此楼查看此楼 #include Unsigned char code Tab[10]{0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0 ...
编写一个程序个人资料管理工具考试题目求大神帮忙可以给一定报酬万分感谢!
c语言100以内奇数的和为多少,编写C#程序，计算100以内所有奇数的和。谢谢了，大神帮忙啊...
编写C#程序,计算100以内所有奇数的和.谢谢了,大神帮忙啊以下文字资料是由(历史新知网www.lishixinzhi.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 编写C#程序 ...
ubuntu14.04扩展屏幕后，打开matlab就死机。求大神帮忙解决！！！万分感谢
ubuntu14.04扩展屏幕后,打开matlab就死机.求大神帮忙解决!!!万分感谢
求大神帮忙，想要一元20次方程的解matlab代码,在线等,(解一元20次方程的解matlab代码)
求大神帮忙,想要一元20次方程的解matlab代码,在线等,(解一元20次方程的解matlab代码) 已知y是一个1*101的数组如下,函数如下,想求得x 135 130 134 128 129 13 ...
两相四线步进电机C语言程序,求大神帮忙看单片机控制两相四线步进电机的程序！...
该楼层疑似违规已被系统折叠隐藏此楼查看此楼 #include #define uchar unsigned char #define uint unsigned int uchar code tim ...
如何修改matlab中的语句,求大神帮忙看一下这个语句怎么改！！！！！
该楼层疑似违规已被系统折叠隐藏此楼查看此楼 clc clear W=imread('e:\matlab\aaa\1.jpg'); imshow (W); I = rgb2gray(W); % 灰度处 ...
女程序猿做了个梦，各路大神惊现神级评论！
开心一刻! 都说程序员是地球上比較特殊的物种,而女程序员(也称程序媛)更是稀缺物种,集万千宠爱于一身.比方,Twitter上的一位女程序员不过做了一个梦,立即引来了一众程序员的围观起哄,惊现各种神级评 ...
程序员如何应对中年危机，撸了大神写的spring源码笔记，超详细
前言: 我们通常在面试的时候难免会慌张不已.想必,经历过的人都能体会.但是如果你提前预测和准备面试官要问你的问题,并想出合理的回答方式,就会轻松很多.所以接下来的面试题是我从自己和其他人的面试经历中总 ...

matlab导线平差程序,【求助】闭合导线简易平差Matlab代码需要大神帮忙

matlab导线平差程序,【求助】闭合导线简易平差Matlab代码需要大神帮忙相关推荐

最新文章

热门文章