### R code from vignette source 'BrowserVizDemo.Rnw' ################################################### ### code chunk number 1: style ################################################### BiocStyle::latex() ################################################### ### code chunk number 2: plotDemo ################################################### library(BrowserVizDemo) plotter <- BrowserVizDemo(port=8000:8100); # plenty of ports to choose from stopifnot(ready(plotter)) title <- "simple xy plot test"; setBrowserWindowTitle(plotter, title) plot(plotter, 1:10, (1:10)^2) selectedPoints <- getSelection(plotter) # selectedPoints will be an empty list -unless- you have selected some in the browser with your mouse. closeWebSocket(plotter)