sactyr's questions

Gostaria de incorporar imagens como parte do eixo x em um gráfico plotly (não no lugar do eixo x). Código do que tentei:

library(plotly)
library(dplyr)
library(tidyr)

Animals <- c("giraffes", "orangutans", "monkeys")
SF_Zoo <- c(20, 14, 23)
LA_Zoo <- c(12, 18, 29)
data <- data.frame(Animals, SF_Zoo, LA_Zoo) %>% 
  pivot_longer(cols = c(SF_Zoo, LA_Zoo)) %>% 
  mutate(Animals = paste(Animals, "<img src='https://images.plot.ly/language-icons/api-home/r-logo.png'</img>"))


plot_ly(data, x = ~Animals, y = ~value, type = 'bar', color = ~name) %>%
  layout(
    barmode = "stack"
  )

Como pode ser visto, as imgtags são impressas como string literal. Eu tentei envolver as etiquetas de marcação Animalscom, htmltools::HTMLmas sem sucesso.

Este guia do plotly fala sobre incorporar imagens/logotipos dentro da área do plot, mas eu gostaria de incorporar imagens como parte dos rótulos de marcação. E esta solução Python SO substitui os rótulos de marcação por imagens inteiramente.

Estou interessado em renderizar uma tabela de dados DT dentro do carrossel do slickR. Meu caso de uso real terá uma imagem seguida por uma tabela. Aqui está um exemplo rápido do que estou tentando fazer (o código produz um aplicativo shiny vazio):

library(shiny)
library(dplyr)
library(purrr)
library(DT)
library(slickR)

ui <- fluidPage(
  slickROutput("iris_slickr")
)

server <- function(input, output) {
  
  output$iris_slickr <- renderSlickR({
    
    iris_split <- iris %>% 
      split(f = ~Species) 
    
    slickR(
      map(
        names(iris_split)
        ,~datatable(iris_split[[.x]])
      )
    )
    
  })
  
}

shinyApp(ui = ui, server = server)

No exemplo acima, eu gostaria de um slide por espécie de íris. Acredito que o motivo pelo qual isso não funciona é porque o DT tem suas próprias funções de renderização, e não tenho certeza de como incorporar ambas renderSlickRe renderDTse isso é possível. Sei que poderia simplesmente usar a paginação do datatable para isso, mas, como mencionado, meu caso de uso também terá uma imagem acima de cada tabela, por exemplo, imagem de espécie de íris.