I have difficulty scraping website. It has a web socket open connection. How can I scrape this page with WebSocket using R?