精品偷拍一区二区三区,亚洲精品永久 码,亚洲综合日韩精品欧美国产,亚洲国产日韩a在线亚洲

  • <center id="usuqs"></center>
  • 
    
  • mathematica怎么求解方程組

    mathematica怎么求解方程組
    Reduce[{s1^2 == (x +
    r Sin[\[Alpha]] Sin[\[Beta]])^2 + (r Sin[\[Alpha]] \
    Cos[\[Beta]] + d/2)^2 + (h - r Cos[\[Alpha]])^2,
    s2^2 == (x + r Sin[\[Alpha]] Sin[\[Beta]] -
    l)^2 + (r Sin[\[Alpha]] Cos[\[Beta]] - d/2)^2 + (h -
    r Cos[\[Alpha]])^2,0 < \[Alpha] < Pi/2,
    0 < \[Beta] < Pi/2},{\[Alpha],\[Beta]}]
    用 mathematica 始終在運(yùn)行啊
    數(shù)學(xué)人氣:953 ℃時(shí)間:2020-09-01 11:43:21
    優(yōu)質(zhì)解答
    解析解太復(fù)雜,無法求出啊.只能將未知數(shù)的實(shí)際值代入方程,求得數(shù)值解.我把x,r,d,h,l都用數(shù)值帶入,然后只求Alpha和Beta關(guān)于s1和s2的關(guān)系,可是還是求不出來

    難道 只能也帶入s1和s2,最后求出Alpha和Beta?你給出一組x,r,d,h,l的值,我試著幫你求解一下。x=4r=0.5 d=1 h=2 l=8 真心感謝大神啊Clear["Global`*"]
    x = 4 ; r = 0.5 ; d = 1 ; h = 2 ; l = 8;
    plot := FindRoot[{s1^2 == (x +
    r Sin[\[Alpha]] Sin[\[Beta]])^2 + (r Sin[\[Alpha]] Cos[\
    \[Beta]] + d/2)^2 + (h - r Cos[\[Alpha]])^2,
    s2^2 == (x + r Sin[\[Alpha]] Sin[\[Beta]] -
    l)^2 + (r Sin[\[Alpha]] Cos[\[Beta]] - d/2)^2 + (h -
    r Cos[\[Alpha]])^2}, {{\[Alpha], 1, Pi/2}, {\[Beta], 1,
    Pi/2}}];
    Table[plot, {s1, 1, 3,0.2}, {s2, 1, 3,0.2}] // MatrixForm
    修改最后一條語句s1和s2的范圍,可以得到符合要求的一系列值。然后對(duì)結(jié)果擬合即可得到Alpha和Beta關(guān)于s1和s2的關(guān)系。數(shù)值擬合可以參考其它資料。
    我來回答
    類似推薦
    請(qǐng)使用1024x768 IE6.0或更高版本瀏覽器瀏覽本站點(diǎn),以保證最佳閱讀效果。本頁提供作業(yè)小助手,一起搜作業(yè)以及作業(yè)好幫手最新版!
    版權(quán)所有 CopyRight © 2012-2024 作業(yè)小助手 All Rights Reserved. 手機(jī)版