Hi,
This is an easy fix with one extra line of CSS:
library(shiny)
library(shinydashboard)
library(shinyWidgets)
ui <- dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody(
tags$img(src = "https://www.pngfind.com/pngs/m/461-4619276_hello-lettering-hd-png-download.png",
style = 'position: absolute; opacity: 0.2;')
)
)
server <- function(input, output) {}
shinyApp(ui, server)
Adjust the opacity of value in the style argument to any you like (0 = completely transparant, 1 = completely opaque)
Hope this helps,
PJ