An R experiment to create animated patterns made by pins in movement.
You will need to install the following packages (if you don't have them already):
install.packages("tidyverse") install.packages("data.table") install.packages("gganimate")
Animations depend on three main parameters:
n_points: Dimension of the grid (
closeness: Separation of consecutive pins between columns (in radians).
speed: Incremental angle to add in each frame to all pins
v_angles: Initial arrange of pins
A complete explanation of the experiment can be found at fronkonstin
Antonio Sánchez Chinchón: