How to return event$data in rstudio/websocket

Question

I am trying to extend websocket::Websocket with a method that sends some data and returns the message, so that I can assign it to an object. My question is pret