# NOT RUN {
if (interactive() && require(dash)) {
# Note that htmlObjectEl generates the <object> HTML element;
# for more information, please visit the link in this
# component's description.
library(dash)
library(dashHtmlComponents)
app <- Dash$new()
app$layout(
htmlDiv(list(
htmlObjectEl(
width = 100,
height = 97
#data = "https://i.postimg.cc/tJd8PSVf/Plotly-logo-01-square.png"
)
))
)
app$run_server()
}
# }
Run the code above in your browser using DataLab