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