Derivative of an interpolated function
$begingroup$
I am trying to take the derivative of an interpolated function. I am given the function values and the derivatives at some irregular points. Here is my minimal working example to reproduce the error:
i = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
Plot[i[t], {t, 0, 4}]

Plot[i'[t], {t, 0, 4}]

Apparently the interpolation is working, but not the derivative. Is there something I am doing wrong or is this a bug?
calculus-and-analysis interpolation
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
$endgroup$
add a comment |
$begingroup$
I am trying to take the derivative of an interpolated function. I am given the function values and the derivatives at some irregular points. Here is my minimal working example to reproduce the error:
i = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
Plot[i[t], {t, 0, 4}]

Plot[i'[t], {t, 0, 4}]

Apparently the interpolation is working, but not the derivative. Is there something I am doing wrong or is this a bug?
calculus-and-analysis interpolation
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
$endgroup$
add a comment |
$begingroup$
I am trying to take the derivative of an interpolated function. I am given the function values and the derivatives at some irregular points. Here is my minimal working example to reproduce the error:
i = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
Plot[i[t], {t, 0, 4}]

Plot[i'[t], {t, 0, 4}]

Apparently the interpolation is working, but not the derivative. Is there something I am doing wrong or is this a bug?
calculus-and-analysis interpolation
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
$endgroup$
I am trying to take the derivative of an interpolated function. I am given the function values and the derivatives at some irregular points. Here is my minimal working example to reproduce the error:
i = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
Plot[i[t], {t, 0, 4}]

Plot[i'[t], {t, 0, 4}]

Apparently the interpolation is working, but not the derivative. Is there something I am doing wrong or is this a bug?
calculus-and-analysis interpolation
calculus-and-analysis interpolation
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
asked 8 hours ago
fuerstmyschkinfuerstmyschkin
282
282
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
New contributor
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
fuerstmyschkin is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.
add a comment |
add a comment |
2 Answers
2
active
oldest
votes
$begingroup$
Remember the chain rule. You feed Interpolation with very contradictory information: The first derivative does not fit the parameterization of the curve.
This works better:
i = Interpolation[Table[{{2 t}, Sin[t], 1/2 Cos[t]}, {t, 0., 4., 0.01}]];
GraphicsRow[{
Plot[i[t], {t, 0, 4}],
Plot[i'[t], {t, 0, 4}]
}]

Alternatively, you may use
i = Interpolation[Table[{{t}, Sin[t], Cos[t]}, {t, 0., 4., 0.01}]];
$endgroup$
$begingroup$
Nice, but isn'tNredundant here?{t, 0., 4., 0.01}should be enough?
$endgroup$
– Mr.Wizard♦
5 hours ago
$begingroup$
@Mr.Wizard Of course you're right. I removed it.
$endgroup$
– Henrik Schumacher
3 hours ago
add a comment |
$begingroup$
There is no error.
Given
f = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
when you make the plot
Plot[f[t], {t, 0, 8}]

it looks like a nice smooth curve which should have a smooth derivative, but if you plot a small section of the domain, like this
Plot[f[t], {t, 0, .1}]

you see it is actually highly oscillatory, which explains your derivative plot.
$endgroup$
add a comment |
Your Answer
StackExchange.ifUsing("editor", function () {
return StackExchange.using("mathjaxEditing", function () {
StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
});
});
}, "mathjax-editing");
StackExchange.ready(function() {
var channelOptions = {
tags: "".split(" "),
id: "387"
};
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function() {
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled) {
StackExchange.using("snippets", function() {
createEditor();
});
}
else {
createEditor();
}
});
function createEditor() {
StackExchange.prepareEditor({
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader: {
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
},
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
});
}
});
fuerstmyschkin is a new contributor. Be nice, and check out our Code of Conduct.
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193578%2fderivative-of-an-interpolated-function%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
2 Answers
2
active
oldest
votes
2 Answers
2
active
oldest
votes
active
oldest
votes
active
oldest
votes
$begingroup$
Remember the chain rule. You feed Interpolation with very contradictory information: The first derivative does not fit the parameterization of the curve.
This works better:
i = Interpolation[Table[{{2 t}, Sin[t], 1/2 Cos[t]}, {t, 0., 4., 0.01}]];
GraphicsRow[{
Plot[i[t], {t, 0, 4}],
Plot[i'[t], {t, 0, 4}]
}]

Alternatively, you may use
i = Interpolation[Table[{{t}, Sin[t], Cos[t]}, {t, 0., 4., 0.01}]];
$endgroup$
$begingroup$
Nice, but isn'tNredundant here?{t, 0., 4., 0.01}should be enough?
$endgroup$
– Mr.Wizard♦
5 hours ago
$begingroup$
@Mr.Wizard Of course you're right. I removed it.
$endgroup$
– Henrik Schumacher
3 hours ago
add a comment |
$begingroup$
Remember the chain rule. You feed Interpolation with very contradictory information: The first derivative does not fit the parameterization of the curve.
This works better:
i = Interpolation[Table[{{2 t}, Sin[t], 1/2 Cos[t]}, {t, 0., 4., 0.01}]];
GraphicsRow[{
Plot[i[t], {t, 0, 4}],
Plot[i'[t], {t, 0, 4}]
}]

Alternatively, you may use
i = Interpolation[Table[{{t}, Sin[t], Cos[t]}, {t, 0., 4., 0.01}]];
$endgroup$
$begingroup$
Nice, but isn'tNredundant here?{t, 0., 4., 0.01}should be enough?
$endgroup$
– Mr.Wizard♦
5 hours ago
$begingroup$
@Mr.Wizard Of course you're right. I removed it.
$endgroup$
– Henrik Schumacher
3 hours ago
add a comment |
$begingroup$
Remember the chain rule. You feed Interpolation with very contradictory information: The first derivative does not fit the parameterization of the curve.
This works better:
i = Interpolation[Table[{{2 t}, Sin[t], 1/2 Cos[t]}, {t, 0., 4., 0.01}]];
GraphicsRow[{
Plot[i[t], {t, 0, 4}],
Plot[i'[t], {t, 0, 4}]
}]

Alternatively, you may use
i = Interpolation[Table[{{t}, Sin[t], Cos[t]}, {t, 0., 4., 0.01}]];
$endgroup$
Remember the chain rule. You feed Interpolation with very contradictory information: The first derivative does not fit the parameterization of the curve.
This works better:
i = Interpolation[Table[{{2 t}, Sin[t], 1/2 Cos[t]}, {t, 0., 4., 0.01}]];
GraphicsRow[{
Plot[i[t], {t, 0, 4}],
Plot[i'[t], {t, 0, 4}]
}]

Alternatively, you may use
i = Interpolation[Table[{{t}, Sin[t], Cos[t]}, {t, 0., 4., 0.01}]];
edited 3 hours ago
answered 7 hours ago
Henrik SchumacherHenrik Schumacher
57k577157
57k577157
$begingroup$
Nice, but isn'tNredundant here?{t, 0., 4., 0.01}should be enough?
$endgroup$
– Mr.Wizard♦
5 hours ago
$begingroup$
@Mr.Wizard Of course you're right. I removed it.
$endgroup$
– Henrik Schumacher
3 hours ago
add a comment |
$begingroup$
Nice, but isn'tNredundant here?{t, 0., 4., 0.01}should be enough?
$endgroup$
– Mr.Wizard♦
5 hours ago
$begingroup$
@Mr.Wizard Of course you're right. I removed it.
$endgroup$
– Henrik Schumacher
3 hours ago
$begingroup$
Nice, but isn't
N redundant here? {t, 0., 4., 0.01} should be enough?$endgroup$
– Mr.Wizard♦
5 hours ago
$begingroup$
Nice, but isn't
N redundant here? {t, 0., 4., 0.01} should be enough?$endgroup$
– Mr.Wizard♦
5 hours ago
$begingroup$
@Mr.Wizard Of course you're right. I removed it.
$endgroup$
– Henrik Schumacher
3 hours ago
$begingroup$
@Mr.Wizard Of course you're right. I removed it.
$endgroup$
– Henrik Schumacher
3 hours ago
add a comment |
$begingroup$
There is no error.
Given
f = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
when you make the plot
Plot[f[t], {t, 0, 8}]

it looks like a nice smooth curve which should have a smooth derivative, but if you plot a small section of the domain, like this
Plot[f[t], {t, 0, .1}]

you see it is actually highly oscillatory, which explains your derivative plot.
$endgroup$
add a comment |
$begingroup$
There is no error.
Given
f = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
when you make the plot
Plot[f[t], {t, 0, 8}]

it looks like a nice smooth curve which should have a smooth derivative, but if you plot a small section of the domain, like this
Plot[f[t], {t, 0, .1}]

you see it is actually highly oscillatory, which explains your derivative plot.
$endgroup$
add a comment |
$begingroup$
There is no error.
Given
f = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
when you make the plot
Plot[f[t], {t, 0, 8}]

it looks like a nice smooth curve which should have a smooth derivative, but if you plot a small section of the domain, like this
Plot[f[t], {t, 0, .1}]

you see it is actually highly oscillatory, which explains your derivative plot.
$endgroup$
There is no error.
Given
f = Interpolation[Table[{{2 t}, Sin[t], Cos[t]}, {t, 0, 4, 0.01}]]
when you make the plot
Plot[f[t], {t, 0, 8}]

it looks like a nice smooth curve which should have a smooth derivative, but if you plot a small section of the domain, like this
Plot[f[t], {t, 0, .1}]

you see it is actually highly oscillatory, which explains your derivative plot.
answered 7 hours ago
m_goldbergm_goldberg
87.6k872198
87.6k872198
add a comment |
add a comment |
fuerstmyschkin is a new contributor. Be nice, and check out our Code of Conduct.
fuerstmyschkin is a new contributor. Be nice, and check out our Code of Conduct.
fuerstmyschkin is a new contributor. Be nice, and check out our Code of Conduct.
fuerstmyschkin is a new contributor. Be nice, and check out our Code of Conduct.
Thanks for contributing an answer to Mathematica Stack Exchange!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
Use MathJax to format equations. MathJax reference.
To learn more, see our tips on writing great answers.
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193578%2fderivative-of-an-interpolated-function%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown