Using sequence command
repeat action with sequence command
We can use the 'Sequence' command to generate a list of objects based on action applied repeated to the same object and can be described in terms of a counter n.
In the following example, the action of rotating a triangle (poly1) is repeated 10 times, generating 10 images:
Sequence[Rotate[poly1, k*t, A], k, 1, 10]
In this command, the letter k is used to indicate how the angle should change from the first to the last (10) image.
figure 4
another example of repeated dilation
This is a similar example showing result of repeating dilation on the same object:
Sequence[Dilate[poly1, r^k, A], k, 1, 10]
figure 5
making a spiral pattern
Finally, a spiral pattern can be made by generating a sequence of images from rotation and dilation at the same time:
Sequence[Dilate[Rotate[poly1, k*t, A], r^k, A], k, 1, 10]