Group Abstract Group Abstract

Message Boards Message Boards

0
|
11.1K Views
|
13 Replies
|
0 Total Likes
View groups...
Share
Share this post:

Avi export - set time/speed

Posted 11 years ago
POSTED BY: Michael Steffen
13 Replies
Posted 10 years ago

This was irritating me, too - but simply set step to negative did not came to my mind....works like a charm now, many thanks! Hours of playing around, and a simple - solves it :D

POSTED BY: Michael Steffen
Posted 10 years ago

And how can I create a list of frames (or better: export to .avi) this one here:

Animate[Graphics[{White, 
Line[Table[{-.98^n*Sin[n*Pi/2], .98^n*Cos[n*Pi/2]}, {n, 0,  1000}]]}, PlotRange -> p, ImageSize -> {1280, 720}, 
Background -> Black], {p, .39, .37, .01}]

The easiest looking one but I do not get it...

Export[NotebookDirectory[] <> "The-Light.avi",  Table[Graphics[{White, 
Line[Table[{-.98^n*Sin[n*Pi/2], .98^n*Cos[n*Pi/2]}, {n, 0, 1000}]]}, PlotRange -> p, ImageSize -> {640, 360},Background -> Black], {p, .39, .37, .01}]]

does not work, same as my playarounds with ListAnimate....anyone a little hint for me how to create an avi from this?

POSTED BY: Michael Steffen

Hi Michael,

the problem simply seems to be that you are exporting an empty list:

Table[someFunction[p], {p, .39, .37, .01}]

You can not go from .39 to .37 with a positive stepsize .01; is must read:

Table[someFunction[p], {p, .39, .37, -.01}]

Animate and Manipulate are more tolerant in this respect, but not Table.

Regards -- Henrik

POSTED BY: Henrik Schachner
Posted 11 years ago

Solved - I exchanged every '80' with 160, the 160 in the export-function with 320 (2 'rounds') - and now I have what I wanted - 12 seconds slow running, 300 frames, and it works.

(There is maybe another little flaw with line-length of the boxes, not sure, I need to watch it on pc first and try around a bit - but when I understand 'the way' I'll for sure get the rest perfect, too. (-> if line-length is really damaged, the reason could only be one of the 80/160-values))

POSTED BY: Michael Steffen
Posted 11 years ago

No, as I do not really understand what happens there exactly for now. I found some animations and thought it maybe is possible to do some videos of them on the quick...seems it is not as easy as I have imagined^^

POSTED BY: Michael Steffen

I thought your parameter t in CubeTrail was only in the rotation, but it also appears in the choice of vertices. Can you unlink the two meanings?

POSTED BY: Gianluca Gorni
Posted 11 years ago

Doublepost

POSTED BY: Michael Steffen
Posted 11 years ago
POSTED BY: Michael Steffen
Posted 11 years ago
POSTED BY: Michael Steffen
POSTED BY: Gianluca Gorni
Posted 11 years ago
POSTED BY: Michael Steffen
Posted 11 years ago
POSTED BY: Michael Steffen
Posted 11 years ago

In ParallelTable you generate 80 frames, then you are exporting at 900 frames per second. However, the corrected code below produces a really cool 36 second movie!

Export[NotebookDirectory[] <> "movie2.avi", 
 ParallelTable[CubeTrail[4, 8, 3.8, .75, n], {n, 1, 900}], 
 "FrameRate" -> 25, "VideoEncoding" -> Uncompressed]
POSTED BY: David Keith
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard