# NOT RUN {
bot <- Bot(token = bot_token("RTelegramBot"))
chat_id <- user_id("Me")
photo_url <- "https://telegram.org/img/t_logo.png"
bot$sendPhoto(chat_id = chat_id,
photo = photo_url,
caption = "Telegram Logo")
# }
Run the code above in your browser using DataLab