R shiny app to play with lissajous figures