如何在Mathematica中组合两个图形

时间:2018-05-16 18:03:00

标签: plot wolfram-mathematica

所以,我有一个任务,我需要制作一个图形,显示如何根据内部的水位改变容器中的水量。 Picture of vessel, consisting of one cilinder and two conuses

我找到了公式(H< R和H> R),制作了2个图并将它们组合在一起,但我们之间有差距。可能有什么不对?

p1 = Plot[
  L*1/2*R^2*(2*ArcCos[(R - λ)/R] - Sin[2*ArcCos[(R - λ)/R]]) + 
  2/3*R^2*l*(ArcCos[(R - λ)/R] - 2*Sin[ArcCos[(R - λ)/R]]*
  Cos[ArcCos[(R - λ)/R]] + Cos[ArcCos[(R - λ)/R]]^3*
  Log[Tan[ArcCos[(R - λ)/R]/2 + \[Pi]/4]]) /. H -> λ, {λ, 0, 2 R}];
p2 = Plot[
  L*Pi*R^2 - L*(1/2*R^2*(2*ArcCos[(λ - R)/R] - 
  Sin[2*ArcCos[(λ - R)/R]])) + 2/3*l*Pi*R^2 - 
  1/3*R^2*l*(ArcCos[(λ - R)/R] - 2 Sin[ArcCos[(λ - R)/R]] *
  Cos[ArcCos[(λ - R)/R]] + Cos[ArcCos[(λ - R)/R]]^3*
  Log[Tan[ArcCos[(λ - R)/R]/2 + \[Pi]/4]]) /. H -> λ, {λ, 0, 2 R}];
Show[p1, p2, PlotRange -> Automatic]]

(我很抱歉,我不知道如何以更漂亮的方式提供此代码)

结果我有了这样的图形 the graphic

1 个答案:

答案 0 :(得分:0)

如果我尝试

res.json().then

看看你的每个表达式是什么,因为Lambda非常接近R(我之所以这样做是因为只需用fetch(`https://api.bitbucket.org/2.0/repositories/${circle_project_username}/${circle_project_reponame}/pullrequests`, {headers: {Authorization: auth}}) .then((res) => { res.json().then((data) => { Object.keys(data.values).forEach(key => { if (data.values[key].source.branch.name === branch) { console.log(data.values[key].description); } }) }) }) .catch(res => console.log(res)); 替换为零*无穷大)然后我找到了

Limit[{firstexpr,secondexpr}, λ->R]

所以...我猜你在这些表达中的一个或另一个中有一个小错字。这可能会解释图表中的不连续性。

从那可以追踪并发现缺陷吗?

P.S。我将希腊字符放入帖子的方式是将Greek Character Table中的相应字符粘贴到我的帖子中。