Пример экспорта в HTML
.slides
Спасибо за внимание
ХабрАнимация = AnimatePlot[Sum[(Sin[2π(2j - 1) x])/(2j), {j, 1.0, n}], {x, -1, 1}, {n, 1, 30, 1}];
.slide
# Привет Хабр
<ХабрАнимация/>
{ГрафикНаш1, ГрафикНаш2} = {
ListPlot3D[square[{{2, 5}, {3, 7}}], Mesh -> None]
,
ListPlot3D[Abs@Fourier@square[{{2, 5}, {3, 7}}], Mesh -> None, ColorFunction -> "Rainbow"]
};
.slide
# Пример
<Row>
<ГрафикНаш1/>
<ГрафикНаш2/>
</Row>