|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
我的代码:
0 @/ s" o- K7 j/ J. s& pclear all+ v" H1 ?* v- Y! G/ b- }9 ~
syms xc Rw xt yt b h C; % 定义符号) S/ h0 \; O/ n; ^/ a* m
eqn = (xt-xc)^2+(Rw+4*h*xt^2/b^2-h)^2-Rw^2 == 0; % 表达式2 P7 i9 D( X; Y$ Q' P' X" {
col = collect(eqn) % 合并同类项9 k( p- N) h0 Y) S7 y! f: H' Z% @
sol = solve(col,xt); % 求解以xt为自变量得形式- w8 T( f1 h, O c# a
s = vpa(sol,3) % 限制显示精度
" W8 e- D5 \' M) ]$ ws = roots(sol) % 显示解! ^8 @. I) Y7 F% v7 r5 X1 S
: F- c E* ^0 p) s
我的想法:! ]% g0 R+ [1 w9 N
将多项式(xt-xc)^2+(Rw+4*h*xt^2/b^2-h)^2-Rw^2 == 0,将xt提到前面表示为xt=...的形式6 P, Q( J9 v2 ?, b# T4 j$ p* N
结果显示太长,请问什么原因,还是本来解就这么多,有没有简化的办法,谢谢5 n; `, r t) L/ j; A
|
|