Прикрепите изображение ggplot к твиту через виджет публикации Twitter в приложении Shiny - PullRequest
1 голос
/ 29 мая 2020

У меня есть приложение Shiny, в котором есть виджет для публикации твита с предварительно загруженным текстом. Он отображается в приложении в виде кнопки с надписью «Твитнуть», которая отправляет текст, расположенный в строке текста данных тегов $ div раздела кода. Я также хотел бы иметь возможность включать изображение диаграммы ggplot в твит, который создается, когда люди используют приложение Shiny в Интернете.

Возможно ли это вообще? Я видел предложения о том, что карты Twitter могут быть вариантом, но я не знаком с ними и не знаю, как заставить их работать в этом инструменте.

Ниже мой минимальный представитель. Приложение размещено на ffevaluator.com/tools/draftevaluator, если вы хотите увидеть приложение в его полной форме.

ui:

ui <- fluidPage(
    mainPanel(
      plotOutput("draftPlot"),
      tags$div(
        HTML("<div style='float:right'>
             <a href='https://twitter.com/share' 
             class='twitter-share-button' 
             align='middle' 
             data-url='www.mywebsite.com' 
             data-text='Insert text here!' 
             data-size='large'>Tweet
             </a>
             <script>!function(d,s,id){
             var js,fjs=d.getElementsByTagName(s)[0],p=/^http:/.test(d.location)?'http':'https';
             if(!d.getElementById(id)){
             js=d.createElement(s);
             js.id=id;
             js.src=p+'://platform.twitter.com/widgets.js';
             fjs.parentNode.insertBefore(js,fjs);
             }
             }(document, 'script', 'twitter-wjs');
             </script>
             </div>")
        )) )

server:

server <- function(input, output) {


  output$draftPlot <- renderPlot({    
    ggplot() +
      geom_smooth() +
      geom_point() 
  })


}

Я также разместил это на веб-сайте сообщества RStudio (здесь: https://community.rstudio.com/t/attach-ggplot-image-to-tweet-through-twitter-share-widget-in-shiny-app/67867 ), но пока не получил никаких ответов.

1 Ответ

0 голосов
/ 29 мая 2020

К сожалению, всплывающее окно обмена в Twitter (twitter.com/share) не может содержать изображение. Карточка Twitter могла бы работать, если бы вы делились ссылкой на веб-страницу stati c в тексте твита, и если бы эта страница имела разметку, включающую изображение, так что изображение будет отображаться как предварительный просмотр ссылки. Я не знаком с Shiny относительно того, может ли это сработать здесь.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...