# template for point insertion precprossing
pt<-getPoint() # pt contains coordinates derived from the mouse move
#apply your point manipulations here
tibs<-movePoint(pt=pt, context=context )
tibs # always return tibs
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.