Send message via XMPP protocol with R