AW: tangent in turning point

• To: mathgroup at smc.vnet.net
• Subject: [mg48885] AW: [mg48857] tangent in turning point
• From: Matthias.Bode at oppenheim.de
• Date: Tue, 22 Jun 2004 05:31:25 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Hi Christian,

did you think of this:

data1 = {1, 1.4, 1.7, 1.8, 1.95, 2, 1.97,
1.96, 1.7, 1.65, 1.64, 1.62, 1.45};
f01 = Interpolation[data1];
Table[f01[x], {x, 1, 13}]
Plot[f01[x], {x, 1, 13}, PlotRange ->
{{1, 13}, {0, 2.1}}, GridLines ->
{{}, {2}}];

with tangent at maximum?

Or did you mean the point where the curvature changes its direction and the
"tangent" pierces the curve?

Best regards,
Matthias Bode
Sal. Oppenheim jr. & Cie. KGaA
Untermainanlage 1
D-60329 Frankfurt am Main
GERMANY
Tel.: +49(0)69 71 34 53 80
Mobile: +49(0)172 6 74 95 77
Fax: +49(0)69 71 34 95 380
E-mail: matthias.bode at oppenheim.de
Internet: http://www.oppenheim.de

-----Ursprüngliche Nachricht-----
Von: Christian Christmann [mailto:plfriko at yahoo.de]
Gesendet: Samstag, 19. Juni 2004 10:31
An: mathgroup at smc.vnet.net
Betreff: [mg48857] tangent in turning point

Hi,

I'm looking for a software which can solve
the following problem:

I've measured some values for the velocity
of a test vehicle in a regular short period
of time. Thus, I have pais of values (velocity
x in time t). I would like to use these values
to draw a graph and find then the turning point.
Hence, the program should draw a tangent through
the turning point.

Please tell me if mathematica is able to perform
this task and give me a short instruction for the
solution.

Thank you very much.

Best regards,

Christian Christmann

```

• Prev by Date: coupled eqns in NDSolve
• Next by Date: Re: Net/Link: Problem with DLL (2)
• Previous by thread: coupled eqns in NDSolve