[fermé] affichage d'une image en utilisant Shiny

[Michel Carpentier]

Bonjour,

j'ai trouvé ce code :

Code : Tout sélectionner

#PINGOUINS
library(shiny)
library(shiny.fluent)
library(tidyverse)
library(palmerpenguins)
library(plotly)

title <- "Palmer penguins"
previewImages <- list(
  list(
    previewImageSrc = "images/lter_penguins.png",
    width = 300,
    height = 150
  )
)

print(shinyApp(
  ui = fluentPage(
    tags$style('
      body {
          background-color: #379be6;
        }
       div{
       background-color: white;
          color: #f8f8f8;
          border-radius: 5px;
          margin: 0px;
          padding: 5px;
       }'
    ),
    div(
      Text(
        variant = "xLarge",
        "Examples Using shiny.fluent DocumentCard input control",
        block = TRUE
      ),
      Separator(),
      Text(
        variant = "large",
        "Palmer penguins document:",
        block = TRUE
      ),
      tags$br(),
      DocumentCard(
        DocumentCardPreview(previewImages = previewImages),
        DocumentCardTitle(
          title = title,
          shouldTruncate = TRUE
        ),
        DocumentCardActivity(
          activity = "Created by",
          people = list(list(name = "Bilikisu"))
        )
      ),
      textOutput("dateValue")
    )
  ),
  server = function(input, output) {
  }
)
)


je n'arrive pas à trouver comment doit se présenter le chemin de l'image ou comment doitr se présenter l'image pour qu'elle s'affiche.
Dans l'aide de la fonction

Code : Tout sélectionner

?DocumentCard

, l'exemple donne les résultats attendus . en utilisant comme chemin la même formulation que pour charger des données [exemple load("D://genealogy//donnees.RData")] mais avec photo.png à la place de donnees.RData, la photo n'est pas affichée.
quelqu'un peut-il m'aider?
avec mes remerciements
cordialement
Michel