时间戳

首页 > 解决方案 > 在 Shiny 中的图像后添加换行符

html - 在 Shiny 中的图像后添加换行符

问题描述

我是 HTML 新手，正在尝试在 Shiny 中创建自定义登录页面。

这是我的用户界面的片段，但我无法在图像和文本之间获得额外的换行符。图像和文本渲染良好，但不存在中断。我也试过空白 tags$p() 无济于事。 

 navbarPage("",
               tabPanel("Home",
                    tagList(
                        tags$img(src="test_vine.jpg", width = "100%", height = "100%", align = "left"),
                        tags$br(),
                        tags$br(),
                        tags$p("this is a test"))),

标签： htmlrshiny

解决方案

将fluidRow解决这个问题。可能理解 的工作fluidRow将解决主要的对齐问题。

ui <- navbarPage("", tabsetPanel(
           tabPanel("Home",
                    tagList(
                      fluidRow(tags$img(src = "image.png", width = "100%", height = "100%", align = "left")),
                      tags$br(),
                      tags$br(),
                      fluidRow(p("this is a test")))
                    ## Simple way
                   # fluidRow(img(src = "image.png", align = "left", height = 300, width = 500)),
                   #  br(),
                   #  br(),
                   #  fluidRow("this is a test")
                    )))

推荐阅读