Вопросы Теги

Реактивный вызов не работает с тегами $ img (src =?)

Мне не понравилось, как я должен был явно указать все остальные столбцы в других решениях, чтобы это работало лучше всего для меня. Хотя это может быть медленным для больших фреймов данных ...?

df.set_index('Mid').reset_index()

0
задан Jack Teuthof 17 January 2019 в 10:59
поделиться

1 ответ

Ответ

После небольшого поиска у меня получилось следующее: Сервер: 

 output$Imagen <- renderImage({
      if(ratingGiver() > 9){
        Leg <- "www/5stars.png"
      } else if (ratingGiver() > 8) {
        Leg <- "www/45stars.png"
      }else if (ratingGiver() > 7) {
        Leg <- "www/4stars.png"
      }else if (ratingGiver() > 6) {
        Leg <- "www/35stars.png"
      }else if (ratingGiver() > 5) {
        Leg <- "www/3stars.png"
      }else if (ratingGiver() > 4) {
        Leg <- "www/25stars.png"
      }else if (ratingGiver() > 3) {
        Leg <- "www/2stars.png"
      }else if (ratingGiver() > 2) {
        Leg <- "www/15stars.png"
      }else if (ratingGiver() > 1) {
        Leg <- "www/1stars.png"
      }else{
        Leg <- "www/0byebitchgone.png"
      }
      list(src=Leg, height = 90, width = 380)

    }, deleteFile = FALSE)

Тело: 

imageOutput(outputId="Imagen")
0
ответ дан Jack Teuthof 17 January 2019 в 10:59
поделиться
Другие вопросы по тегам:

Похожие вопросы: