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
quelqu'un peut-il m'aider?
avec mes remerciements
cordialement
Michel