# NOT RUN {
if (interactive()) {
ui <- fluidPage(
use_fabric(),
fabric_text(cid = "can",
textId = "text",
text = "But A Hero Is A Guy Who Gives Out The Meat To Everyone Else.",
cfill = "#DD5347",
left = 120,
shadowCol = "blue",
fontSize = 20,
fontWeight = "bold",
lineHeight = 3
)
)
server <- function(input, output) {}
shinyApp(ui = ui, server = server)
}
# }
Run the code above in your browser using DataLab