请求MATLAB解方程高手:MATLAB解超越方程,详情见问题补充.方程:f=4*((z1-hatx+xt1)^2+((hatx-xt1)*cotd(at))^2-C1)^0.5+((A2-xt1)^2-C2)^0.5-D=0其中:z1 = 20;z2 = 80;hatx = 1;at = 20;at1= [at-5:0.1:at+15];A2 = (z1+z2)*cosd(at)/cosd(

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/07 04:31:03
请求MATLAB解方程高手:MATLAB解超越方程,详情见问题补充.方程:f=4*((z1-hatx+xt1)^2+((hatx-xt1)*cotd(at))^2-C1)^0.5+((A2-xt1)^2-C2)^0.5-D=0其中:z1 = 20;z2 = 80;hatx = 1;at = 20;at1= [at-5:0.1:at+15];A2 = (z1+z2)*cosd(at)/cosd(

请求MATLAB解方程高手:MATLAB解超越方程,详情见问题补充.方程:f=4*((z1-hatx+xt1)^2+((hatx-xt1)*cotd(at))^2-C1)^0.5+((A2-xt1)^2-C2)^0.5-D=0其中:z1 = 20;z2 = 80;hatx = 1;at = 20;at1= [at-5:0.1:at+15];A2 = (z1+z2)*cosd(at)/cosd(
请求MATLAB解方程高手:MATLAB解超越方程,详情见问题补充.
方程:
f=4*((z1-hatx+xt1)^2+((hatx-xt1)*cotd(at))^2-C1)^0.5+((A2-xt1)^2-C2)^0.5-D=0
其中:
z1 = 20;
z2 = 80;
hatx = 1;
at = 20;
at1= [at-5:0.1:at+15];
A2 = (z1+z2)*cosd(at)/cosd(at1)+2*hatx-z1;
C1 = (z1*cosd(at))^2;
C2 = (z2*cosd(at))^2;
D = (z1+z2)*cosd(at)*tand(at1);
要求:
求at1= [at-5:0.1:at+15]时方程f(x)=0的所以解,并将其赋给数组x1.
得到满意答案后我会再加奖全分,
只要实数解。

请求MATLAB解方程高手:MATLAB解超越方程,详情见问题补充.方程:f=4*((z1-hatx+xt1)^2+((hatx-xt1)*cotd(at))^2-C1)^0.5+((A2-xt1)^2-C2)^0.5-D=0其中:z1 = 20;z2 = 80;hatx = 1;at = 20;at1= [at-5:0.1:at+15];A2 = (z1+z2)*cosd(at)/cosd(
z1 = 20;
z2 = 80;
hatx = 1;
at = 20;
AT1= [at-5:0.1:at+15];
for i=1:length(AT1)
at1=AT1(i);
A2 = (z1+z2)*cosd(at)/cosd(at1)+2*hatx-z1;
C1 = (z1*cosd(at))^2;
C2 = (z2*cosd(at))^2;
D = (z1+z2)*cosd(at)*tand(at1);
f=@(x)4*((z1-hatx+x)^2+((hatx-x)*cotd(at))^2-C1)^0.5+((A2-x)^2-C2)^0.5-D;
xx=fzero(f,0); %这个命令只能找出一个实数解,at1值较小时,好像没有实数解
x1(i)=xx;
end
plot(AT1,x1)