создание анимации в пакете Mathematica 6

[4aineg]

Здравствуйте, уважаемые эксперты!
Помогите пожалуйста создать анимацию на примере множества ограничений

вот имеется следующий код:

ogr1 = x1^2 + x2^2 <= 16;
ogr2 = x1 + x2 <= 5;
ogr3 = x1 >= 0 && x2 >= 0;
plot1 = RegionPlot[ogr1, {x1, -10, 10}, {x2, -10, 10}]
plot2 = RegionPlot[ogr2, {x1, -10, 10}, {x2, -10, 10}]
plot3 = RegionPlot[ogr3, {x1, -10, 10}, {x2, -10, 10}]
Show[plot2, plot1, plot3]
plot4 = RegionPlot[ogr1 && ogr2 && ogr3, {x1, 0, 10}, {x2, 0, 10}]

И еще одна проблема: посоветуйте какую-нибудь электронную книжку по пакету Mathematica формата типа pdf, djvu именно для 6-й версии ато у меня только по 4й и как я ни пробовал найти материала ничего не находил
Заранее Спасибо!!!

[Leierkastenmann]

Что-то я не очень понял что анимировать-то надо? В коде приведены четыре графика, их четыре что ли в одну анимацию надо загнать?

[4aineg]

Leierkastenmann писал(а):

Что-то я не очень понял что анимировать-то надо? В коде приведены четыре графика, их четыре что ли в одну анимацию надо загнать?

Да и если можно можете дать какую-нибудь информацию по Mathematica 6?

[Leierkastenmann]

4aineg писал(а):

Leierkastenmann писал(а):

Что-то я не очень понял что анимировать-то надо? В коде приведены четыре графика, их четыре что ли в одну анимацию надо загнать?

Да и если можно можете дать какую-нибудь информацию по Mathematica 6?

Ну делаете, например, так:

ogrList = {ogr1, ogr2, ogr3, ogr1 && ogr2 && ogr3};
ogrPlotList = RegionPlot[#, {x1, -10, 10}, {x2, -10, 10}] & /@ ogrList;
ListAnimate[ogrPlotList]

Если необходим еще вывод рисунка, соответствующего Show[plot2, plot1, plot3] , то в ogrList просто добавьте ogr1 || ogr2 || ogr3.

Запись

ogrPlotList = RegionPlot[#, {x1, -10, 10}, {x2, -10, 10}] & /@ ogrList;

это эквивалент построения таблицы (списка) более явным способом

ogrPlotList = Table[RegionPlot[ogrList[[i]], {x1, -10, 10}, {x2, -10, 10}], {i, Length[ogrList]}];

Информацией по 6-й математике не обладаю, потому как начинал еще со 2-й версии и во всех последующих версиях все свои потребности покрывал хэлпом.