# NOT RUN {
bot <- Bot(token = bot_token("RTelegramBot"))
chat_id <- user_id("Me")
bot$sendMessage(chat_id = chat_id,
text = "foo *bold* _italic_",
parse_mode = "Markdown")
# }
Run the code above in your browser using DataLab