2011-05-24 15 views
16

Eksportowanie do animowanego gif wydaje się być zmienione w Mathematica 8.0.1?Jak wygenerować animowany GIF manipulowania? 8.0.1

normalnie zrobić animowane GIF: a manipulować po prostu pisząc:

v=Manipulate[....] 

then Export["foo.gif",v]; 

Ale teraz to nie działa. Mam tylko jeden statyczny obraz.

Oto przykład:

v=Manipulate[ 
Text[t], 
{{t,4,"start"},0,10,1,ControlType->Trigger,AnimationRate->1,AnimationRepetitions->10} 
] 

Teraz Export["foo.gif",v] tylko generować obraz statyczny, ponieważ nic nie zostało uruchomione.

Ale działa Export["foo.avi",v] i generuje działający film avi.

Również tam kiedyś animowane GIF użyłem opcji wcześniej, ale teraz nie są obsługiwane:

Export["foo.gif",v,ConversionOptions->{"AnimationDisplayTime"->0.5,"Loop"->True},ImageSize->{500,500}] 

Export::convoptobs: ConversionOptions is obsolete. 

Kiedy idę do pomocy, nie widzę opcji GIF tam. Jak kontrolować opóźnienie animacji i takie?

Myślałem, że ktoś tutaj może mieć pomysł.

dzięki --Nasser

+0

nie używam wersji 8, ale jestem ciekaw, co można uzyskać, jeśli używasz: 'eksport [„foo.gif”, {v}]' –

+0

sam efekt, gdy użyłem {v} , nie generowany animowany gif. – Nasser

+0

Szkoda, że ​​to nie było takie proste. Obawiam się, że nie mogę pomóc. –

Odpowiedz

22

Można eksportować Table do animowanego GIF.

v = Table[Panel[Text[t]], {t, 0, 10, 1}]; 
Export["anim.gif", v, "DisplayDurations" -> 0.5] 

Jeśli koniecznie chcesz animacja wyglądać jak Manipulate, można zrobić coś tak.

v = Table[Manipulate[Text[t], 
    {{t, Mod[k, 10], "start"}, 0, 10, 1, ControlType -> Trigger}], 
    {k, 4, 14}]; 
Export["Manip.gif", v, "DisplayDurations" -> 0.5] 
+0

Dziękuję Mark! Tak było. Chciałem zagłosować na twoją odpowiedź, ale to forum mi nie pozwala. Użyłem twojej sztuczki, aby w końcu ożywić małą manipulację, którą zrobiłem dla szkolnej HW. Jeśli chcesz zobaczyć animację, tutaj jest http://12000.org/my_notes/mma_demos/pendulum_flywheel/index.htm Użyłem lateksu, aby go załadować, przeskalowałem trochę. Dzięki jeszcze raz !Lubię to forum znacznie częściej niż inne grupy matematyczne, ponieważ nie ma tu długiego opóźnienia i można wreszcie porozmawiać z Mathematica na dobre. --Nasser – Nasser

+0

@Nasser - Chętnie pomogę! Cieszę się, że lubisz to forum. Z pewnością różni się od mathgroup. Jestem pewien, że oboje mają swoje mocne strony, ale zdecydowanie lubię ten zwrot. Jeśli chodzi o uprowadzenie, zanim to zrobisz, musisz zdobyć trochę reputacji. Nie sądzę, że to za dużo. –

4

Można użyć v = Animate[ Text[t], {{t, 4, "start"}, 0, 10, 1, ControlType -> Trigger, AnimationRate -> 1, AnimationRepetitions -> 10}]

Powiązane problemy