I want to control the plot range of CellularAutomaton
to show both left and right sides when using rule 60.
Currently I have this:
But I want to have something like this:
Code:
Manipulate[
Graphics[ArrayPlot[CellularAutomaton[60, {{1}, 0}, t]],
PlotRange -> {{-100, 100}, {0, 100}}], {t, 0, 30, 1}]