Mfcttrf

Turning an Abelian Group into a Vector Space

Welche normative Autorität hat der Duden? / What's the normative authority of the Duden?

Do universities maintain secret textbooks?

Is Borg adaptation only temporary?

Is "prohibition against," a double negative?

Where could I find a math pen pal?

Magnetic thread storage?

Why do IR remotes influence AM radios?

Eshet Chayil in the Tunisian service

Which is the correct version of Mussorgsky's Pictures at an Exhibition?

IList<T> implementation

Lob Logical Read and lob read-ahead reads in NCCI

What caused the end of cybernetic implants?

What am I looking at here at Google Sky?

Create a list of snaking numbers under 50,000

What is the practical impact of using System.Random which is not cryptographically random?

What are ways to record who took the pictures if a camera is used by multiple people?

What is the motivation behind designing a control stick that does not move?

How to investigate an unknown 1.5GB file named "sudo" in my Linux home directory?

What checks exist against overuse of presidential pardons in the USA?

Cheap oscilloscope showing 16 MHz square wave

German equivalent to "going down the rabbit hole"

Sort Associations by its Values (which are nested lists)

What's the difference between a variable and a memory location?

How to animate a function plot

How to express trigonometric equation in terms of of given trigonometric function?How to write values of function to file?About minimizing calculations when using ComposeListRestarting an Animate animation after variable in Manipulate changesPlot a function which depends on itselfEncapsulated plot function misbehavesHow to pass a pair of values to Table function?How to make a customized plot function that can plot functions with optional parameter?Plot function with many conditions

.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty margin-bottom:0;

3

$begingroup$

How can I plot a function e.g. f[x_] := Sin[x], point by point (animation).

functions animation

share|improve this question

edited 3 mins ago

m_goldberg

91.3k88 gold badges7575 silver badges206206 bronze badges

asked 10 hours ago

UserUser

1633 bronze badges

New contributor

User 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 | 

3

$begingroup$

How can I plot a function e.g. f[x_] := Sin[x], point by point (animation).

functions animation

share|improve this question

edited 3 mins ago

m_goldberg

91.3k88 gold badges7575 silver badges206206 bronze badges

asked 10 hours ago

UserUser

1633 bronze badges

New contributor

User 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$

How can I plot a function e.g. f[x_] := Sin[x], point by point (animation).

functions animation

share|improve this question

edited 3 mins ago

m_goldberg

91.3k88 gold badges7575 silver badges206206 bronze badges

asked 10 hours ago

UserUser

1633 bronze badges

New contributor

User is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

$endgroup$

share|improve this question

edited 3 mins ago

m_goldberg

91.3k88 gold badges7575 silver badges206206 bronze badges

asked 10 hours ago

UserUser

1633 bronze badges

New contributor

User is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

share|improve this question

edited 3 mins ago

m_goldberg

91.3k88 gold badges7575 silver badges206206 bronze badges

asked 10 hours ago

UserUser

1633 bronze badges

New contributor

User is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

edited 3 mins ago

m_goldberg

91.3k88 gold badges7575 silver badges206206 bronze badges

edited 3 mins ago

m_goldberg

91.3k88 gold badges7575 silver badges206206 bronze badges

asked 10 hours ago

UserUser

1633 bronze badges

New contributor

User is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

asked 10 hours ago

UserUser

1633 bronze badges

2 Answers
2

active

oldest

votes

7

$begingroup$

This is one way of doing it to get you started:

ListAnimate@Table[
 Plot[
 Cos[x], x, 0, xmax, 
 PlotRange -> 0, 2 [Pi], -1, 1
 ],
 xmax, 2 [Pi]/20, 2 [Pi], 2 [Pi]/20
]

share|improve this answer

answered 9 hours ago

Thies HeideckeThies Heidecke

7,7612626 silver badges4040 bronze badges

$endgroup$

add a comment | 

0

$begingroup$

Another option is to use Manipulate. Then you customize this in many ways.

Manipulate[
 If[running,
 tick = Not[tick];
 xmax = xmax + Pi/40;
 If[xmax > 4 Pi, xmax = Pi/40]
 ];
 Pause[pause];
 Plot[Cos[x], x, 0, xmax, PlotRange -> 0, 4 Pi, -1.1, 1.1,
 GridLines -> Automatic,
 GridLinesStyle -> LightGray,
 PlotStyle -> Red]
 ,
 Grid[
 Button["run", running = True; tick = Not[tick]],
 Button["stop", running = False; tick = Not[tick]],
 Button["slow down", pause = pause + 1/10; tick = Not[tick]],
 Button["speed up", If[pause > 0, pause = pause - 1/10]]
 
 ],
 tick, True, None,
 xmax, Pi/40, None,
 running, False, None,
 pause, 0, None,
 TrackedSymbols :> tick, running
 ]

share|improve this answer

answered 1 hour ago

NasserNasser

61.5k44 gold badges9393 silver badges216216 bronze badges

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  A helpful tutorial on animations in Mathematica is here youtube.com/watch?v=S03e6dwM100
  $endgroup$
  – Lee
  21 mins ago
  
  

  
  
  
  

add a comment | 

Your Answer

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
);



);

User is a new contributor. Be nice, and check out our Code of Conduct.

draft saved

draft discarded

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

Name

Email

Required, but never shown

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f204562%2fhow-to-animate-a-function-plot%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

7

$begingroup$

This is one way of doing it to get you started:

ListAnimate@Table[
 Plot[
 Cos[x], x, 0, xmax, 
 PlotRange -> 0, 2 [Pi], -1, 1
 ],
 xmax, 2 [Pi]/20, 2 [Pi], 2 [Pi]/20
]

share|improve this answer

answered 9 hours ago

Thies HeideckeThies Heidecke

7,7612626 silver badges4040 bronze badges

$endgroup$

add a comment | 

7

$begingroup$

This is one way of doing it to get you started:

ListAnimate@Table[
 Plot[
 Cos[x], x, 0, xmax, 
 PlotRange -> 0, 2 [Pi], -1, 1
 ],
 xmax, 2 [Pi]/20, 2 [Pi], 2 [Pi]/20
]

share|improve this answer

answered 9 hours ago

Thies HeideckeThies Heidecke

7,7612626 silver badges4040 bronze badges

$endgroup$

add a comment | 

$begingroup$

This is one way of doing it to get you started:

ListAnimate@Table[
 Plot[
 Cos[x], x, 0, xmax, 
 PlotRange -> 0, 2 [Pi], -1, 1
 ],
 xmax, 2 [Pi]/20, 2 [Pi], 2 [Pi]/20
]

share|improve this answer

answered 9 hours ago

Thies HeideckeThies Heidecke

7,7612626 silver badges4040 bronze badges

$endgroup$

ListAnimate@Table[
 Plot[
 Cos[x], x, 0, xmax, 
 PlotRange -> 0, 2 [Pi], -1, 1
 ],
 xmax, 2 [Pi]/20, 2 [Pi], 2 [Pi]/20
]

share|improve this answer

answered 9 hours ago

Thies HeideckeThies Heidecke

7,7612626 silver badges4040 bronze badges

answered 9 hours ago

Thies HeideckeThies Heidecke

7,7612626 silver badges4040 bronze badges

answered 9 hours ago

Thies HeideckeThies Heidecke

7,7612626 silver badges4040 bronze badges

0

$begingroup$

Another option is to use Manipulate. Then you customize this in many ways.

Manipulate[
 If[running,
 tick = Not[tick];
 xmax = xmax + Pi/40;
 If[xmax > 4 Pi, xmax = Pi/40]
 ];
 Pause[pause];
 Plot[Cos[x], x, 0, xmax, PlotRange -> 0, 4 Pi, -1.1, 1.1,
 GridLines -> Automatic,
 GridLinesStyle -> LightGray,
 PlotStyle -> Red]
 ,
 Grid[
 Button["run", running = True; tick = Not[tick]],
 Button["stop", running = False; tick = Not[tick]],
 Button["slow down", pause = pause + 1/10; tick = Not[tick]],
 Button["speed up", If[pause > 0, pause = pause - 1/10]]
 
 ],
 tick, True, None,
 xmax, Pi/40, None,
 running, False, None,
 pause, 0, None,
 TrackedSymbols :> tick, running
 ]

share|improve this answer

answered 1 hour ago

NasserNasser

61.5k44 gold badges9393 silver badges216216 bronze badges

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  A helpful tutorial on animations in Mathematica is here youtube.com/watch?v=S03e6dwM100
  $endgroup$
  – Lee
  21 mins ago
  
  

  
  
  
  

add a comment | 

0

$begingroup$

Another option is to use Manipulate. Then you customize this in many ways.

Manipulate[
 If[running,
 tick = Not[tick];
 xmax = xmax + Pi/40;
 If[xmax > 4 Pi, xmax = Pi/40]
 ];
 Pause[pause];
 Plot[Cos[x], x, 0, xmax, PlotRange -> 0, 4 Pi, -1.1, 1.1,
 GridLines -> Automatic,
 GridLinesStyle -> LightGray,
 PlotStyle -> Red]
 ,
 Grid[
 Button["run", running = True; tick = Not[tick]],
 Button["stop", running = False; tick = Not[tick]],
 Button["slow down", pause = pause + 1/10; tick = Not[tick]],
 Button["speed up", If[pause > 0, pause = pause - 1/10]]
 
 ],
 tick, True, None,
 xmax, Pi/40, None,
 running, False, None,
 pause, 0, None,
 TrackedSymbols :> tick, running
 ]

share|improve this answer

answered 1 hour ago

NasserNasser

61.5k44 gold badges9393 silver badges216216 bronze badges

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  A helpful tutorial on animations in Mathematica is here youtube.com/watch?v=S03e6dwM100
  $endgroup$
  – Lee
  21 mins ago
  
  

  
  
  
  

add a comment | 

$begingroup$

Another option is to use Manipulate. Then you customize this in many ways.

Manipulate[
 If[running,
 tick = Not[tick];
 xmax = xmax + Pi/40;
 If[xmax > 4 Pi, xmax = Pi/40]
 ];
 Pause[pause];
 Plot[Cos[x], x, 0, xmax, PlotRange -> 0, 4 Pi, -1.1, 1.1,
 GridLines -> Automatic,
 GridLinesStyle -> LightGray,
 PlotStyle -> Red]
 ,
 Grid[
 Button["run", running = True; tick = Not[tick]],
 Button["stop", running = False; tick = Not[tick]],
 Button["slow down", pause = pause + 1/10; tick = Not[tick]],
 Button["speed up", If[pause > 0, pause = pause - 1/10]]
 
 ],
 tick, True, None,
 xmax, Pi/40, None,
 running, False, None,
 pause, 0, None,
 TrackedSymbols :> tick, running
 ]

share|improve this answer

answered 1 hour ago

NasserNasser

61.5k44 gold badges9393 silver badges216216 bronze badges

$endgroup$

Manipulate[
 If[running,
 tick = Not[tick];
 xmax = xmax + Pi/40;
 If[xmax > 4 Pi, xmax = Pi/40]
 ];
 Pause[pause];
 Plot[Cos[x], x, 0, xmax, PlotRange -> 0, 4 Pi, -1.1, 1.1,
 GridLines -> Automatic,
 GridLinesStyle -> LightGray,
 PlotStyle -> Red]
 ,
 Grid[
 Button["run", running = True; tick = Not[tick]],
 Button["stop", running = False; tick = Not[tick]],
 Button["slow down", pause = pause + 1/10; tick = Not[tick]],
 Button["speed up", If[pause > 0, pause = pause - 1/10]]
 
 ],
 tick, True, None,
 xmax, Pi/40, None,
 running, False, None,
 pause, 0, None,
 TrackedSymbols :> tick, running
 ]

share|improve this answer

answered 1 hour ago

NasserNasser

61.5k44 gold badges9393 silver badges216216 bronze badges

answered 1 hour ago

NasserNasser

61.5k44 gold badges9393 silver badges216216 bronze badges

answered 1 hour ago

NasserNasser

61.5k44 gold badges9393 silver badges216216 bronze badges