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