2011-05-24 16 views
16

Exportar a un gif animado parece haber cambiado en Mathematica 8.0.1?¿Cómo generar un GIF animado de un Manipulate? 8.0.1

que normalmente hago GIF animados de manipular simplemente escribiendo:

v=Manipulate[....] 

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

Pero ahora no funciona. Acabo de obtener una imagen estática.

Aquí se muestra un ejemplo:

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

ahora Export["foo.gif",v] acaba de generar una imagen estática, ya que nada estaba en marcha.

Pero Export["foo.avi",v] funciona, y genera una película avi en ejecución.

Además, solía haber opciones GIF animados que he usado antes, pero ahora no están soportados:

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

Export::convoptobs: ConversionOptions is obsolete. 

Cuando voy a ayudar, no veo opciones para GIF allí. ¿Cómo puede uno controlar la demora de la animación y tal?

Pensé que alguien aquí podría tener una idea.

gracias --Nasser

+0

yo no uso la versión 8, pero tengo curiosidad de saber lo que se obtiene si se utiliza: 'exportación [ "foo.gif", {v}]' –

+0

El mismo efecto cuando utiliza {v} , no se generó un gif animado. – Nasser

+0

Una pena que no fue tan simple. Temo que no puedo ser de ayuda. –

Respuesta

22

puede exportar un Table a un GIF animado.

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

Si a pesar de que la animación se vea como un Manipulate, se podría hacer algo como tal.

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

Gracias Mark! Eso lo hizo. Quería votar su respuesta, pero el foro no me lo permite. Utilicé tu truco para finalmente animar un pequeño Manipulate que hice para la escuela HW. Si desea ver la animación, aquí está http://12000.org/my_notes/mma_demos/pendulum_flywheel/index.htm Utilicé látex para cargarlo, lo reduje un poco. Gracias de nuevo !Me gusta mucho más este foro que el otro grupo de matemáticas, ya que no hay mucho retraso aquí y uno finalmente puede hablar sobre Mathematica. --Nasser – Nasser

+0

@Nasser - ¡Me alegra ayudar! Y me alegra que te guste este foro. Ciertamente es diferente de mathgroup. Estoy seguro de que ambos tienen sus fortalezas, pero definitivamente me gusta el cambio aquí. Con respecto al voto popular, debes ganar un poco de reputación antes de poder hacerlo. No creo que sea demasiado. –

4

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