Re : intersection point from listplots

• To: mathgroup at smc.vnet.net
• Subject: [mg55596] Re : [mg55588] intersection point from listplots
• From: "Jaccard Florian" <Florian.Jaccard at he-arc.ch>
• Date: Wed, 30 Mar 2005 04:28:56 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```I would use Interpolation.

For example :

In[21]:=
data1 = Table[{i, i^2}, {i, 1, 10}];
data2 = Table[{i, 10*Log[i] + 3}, {i, 1, 10}];

In[16]:=
<< "Graphics`MultipleListPlot`"

In[27]:=
MultipleListPlot[{data1, data2}, PlotJoined -> True];

In[25]:=
f = Interpolation[data1]; g = Interpolation[data2];

In[26]:=
FindRoot[f[x] == g[x], {x, 4}]

Out[26]=
{x -> 4.151786254957007}

Meilleures salutations

F.Jaccard

-----Message d'origine-----
De : Tun Myint Aung [mailto:TMA at nus.edu.sg]
Envoyé : mercredi, 30. mars 2005 10:22
À : mathgroup at smc.vnet.net
Objet : [mg55588] intersection point from listplots

Hi,

I have two sets of lists for two curves. I can plot using ListPlot.
What I want to know is how to get the intersection point in Mathematica.
Any idea!

With Regards,
Civil Engineering Department
National University of Singapore
E1A 02-18
E-mail: g0202015 at nus.edu.sg (or) tma at nus.edu.sg

```

• Prev by Date: Re: Varying colors in Plot3D according to Height
• Next by Date: Re: how to make conditional summation
• Previous by thread: Re: Varying colors in Plot3D according to Height
• Next by thread: nintegrate vs nintegrateinterpolatingfunction vs integrate