### R代码从vignette源代码的BrowserVizDemo。Rnw ' ################################################### ### 代码块1号:风格 ################################################### BiocStyle:乳胶 () ################################################### ### 代码块2号:plotDemo ################################################### 图书馆(BrowserVizDemo)绘图机< BrowserVizDemo(端口= 8000:8100);# stopifnot(ready(plotter)) title <- "simple xy plot test";setBrowserWindowTitle(plotter, title) plot(plotter, 1:10， (1:10)^2) selectedPoints <- getSelection(plotter) # selectedPoints将是一个空列表-除非-你已经用鼠标在浏览器中选择了一些。closeWebSocket(绘图机)