我在Mathematica中使用ListPlot将两组离散数据绘制为两种不同的颜色(红色和蓝色)。我想找到这两个之间的(对应连续曲线的)交点，即所示的点A和B.
我尝试了“FindCluster”方法，并希望获得数据形成线的子集，但效果不是很好。
现在，我始终使用“GetCoordinate”属性直接从图中获取数字。有一种自动且更准确地执行此操作的方法将非常高兴。
最佳答案
我不确定这是否方便您使用，但是有时我让Mathematica插值点列表，然后求解交点:
findGuesses [pointsTable1_，pointsTable2_]:=
块[{interpolatingPolyF1，interpolatingPolyF2}，
interpolatingPolyF1 =
函数[{x}，求值[InterpolatingPolynomial [pointsTable1，x]]]；
interpolatingPolyF2 =
函数[{x}，求值[InterpolatingPolynomial [pointsTable2，x]]]；
(* Print [Plot [{interpolatingPolyF1 [x]，interpolatingPolyF2 [x]}，{x，0,2}]]; *)
{x，y} /。
NSolve [{y == interpolatingPolyF1 [x]，
y == interpolatingPolyF2 [x]}，{x，y}，实数]
]