I am editing an existing R Shiny app:

CodePudding user response：

Due to the styles of this app, you need to set column width to 12 or add another col-sm-6 element, then add <br> and <hr>:

hr(),
h4("Row Dendrogram"),
column(
  width = 12,
  selectizeInput("distFun_col",
                 "Distance Method",
                 c(Euclidean = "euclidean",
                   Maximum = "maximum",
                   Manhattan = "manhattan",
                   Canberra = "canberra",
                   Binary = "binary",
                   Minkowski = "minkowski"),
                 selected = "euclidean")),
br(),
hr(),

Then, it should look like this:

This happens, because the col-sm-* classes have float: left; attribute, which makes them heightless, so they overflow the parent container.