Same tap, two tanks. Shallow water slows the wave, so crests bunch up.

data(ripples) + surface + x(across) + y(along) + z(height) +
color(height) + palette("plasma") + play(instant, speed = 4) |
facet(tank)

Be agog. Use gog.
psychometrician.github.io/gog-book/ #rstats #dataviz #gog