如何在fluidRow列中定位按钮
在Shiny应用程序中，可以使用fluidRow()函数创建一个自适应宽度的行。要在fluidRow()中定位按钮，可以使用Shiny的布局函数和HTML标签来实现。
以下是在fluidRow()列中定位按钮的步骤：
- 使用
fluidRow()函数创建一个自适应宽度的行。
fluidRow(
# 在这里添加按钮和其他UI元素
)- 在
fluidRow()中添加Shiny的布局函数，如column()或sidebarLayout()，来创建列或侧边栏。
fluidRow(
column(width = 6,
# 在这里添加按钮和其他UI元素
),
column(width = 6,
# 在这里添加其他UI元素
)
)- 在列中添加按钮和其他UI元素。
fluidRow(
column(width = 6,
actionButton("button1", "按钮1"),
# 在这里添加其他UI元素
),
column(width = 6,
actionButton("button2", "按钮2"),
# 在这里添加其他UI元素
)
)在上面的示例中，我们使用column()函数将fluidRow()分成两列，并在每列中添加了一个按钮。你可以根据需要调整列的宽度和添加的UI元素。
这是一个完整的示例代码：
library(shiny)
ui <- fluidPage(
fluidRow(
column(width = 6,
actionButton("button1", "按钮1")
),
column(width = 6,
actionButton("button2", "按钮2")
)
)
)
server <- function(input, output) {
# 服务器逻辑
}
shinyApp(ui, server)这个示例创建了一个包含两个按钮的Shiny应用程序。按钮1位于第一列，按钮2位于第二列。你可以根据需要添加其他UI元素或调整列的宽度。
腾讯云相关产品和产品介绍链接地址：
相关·内容
1回答
将fluidRow样式从ui.R移动到www/styles.css
css、r、shiny
我有5个按钮，我想使用css一次控制所有按钮，而不是调用#button1，#button2，#button3…… 有没有办法定义一个"main“类，当我在css文件中进行更改时，所有的按钮都将依赖于它。 或者，如果我只想一次性控制fluidrow1或fluidrow2的按钮，该怎么办？ 请看下面的代码： ui.R shinyUI(fluidPage(theme = "shiny.css",
tags$head(
tags$link(rel = "stylesheet", type = "
浏览 25提问于2019-05-01得票数 0
回答已采纳
1回答
如何在R shiny中打印UI元素附近的错误消息？
r、shiny、shiny-server
示例代码如下：
ui.R
library(shiny)
shinyUI(
fluidRow(column(2, actionButton("add", "ADD details")),
fluidRow(uiOutput("ui"))
)
)
server.R
shinyServer(function(input, output,session){
observeEvent(
input$add,
output$ui <- renderUI({
isolate({
浏览 0提问于2016-10-01得票数 1
2回答
如何增加两个居中动作按钮之间的空间？
r、shiny
我想把两个相同宽度的动作按钮放在中间，在它们之间留出一些空间。所以我试着：
library(shiny)
ui <- fluidPage(
fluidRow(
align = "center",
br(),
column(
12,
actionButton(
inputId = "ab1",
label = "Left button",
style = "width:400px"
),
actionB
浏览 1提问于2019-01-30得票数 1
回答已采纳
1回答
多列fluidRow
r、shiny
如何在fluidRow中对齐小部件而不存在巨大的空白。例如，以下代码：
library(shiny)
ui <- bootstrapPage(
absolutePanel(
id = "pn", top = 5, right = 5, class = "panel panel-default",
fluidRow(
column(width = 3, selectInput("place_format", NULL, choic
浏览 3提问于2020-09-08得票数 0
回答已采纳
1回答
如何在fluidRow列中定位按钮
css、r、shiny
我正在尝试使用fluidRow & column参数在一个闪亮的应用程序中的actionButton旁边放置一个selectInput框。但是，该按钮被放置在其column的顶部。在div中使用text-align:center将按钮置于column视图的中心位置。我希望actionButton的高度和左边的selectBox一样高。
由于Shiny的缘故，我才刚刚开始接触一些CSS，但在这里我却不知所措。提前感谢:)
ui <- fluidPage(title = "Working Title",
sidebarPanel(width = 6,
# *Inpu
浏览 12提问于2016-09-06得票数 2
回答已采纳
2回答
对齐fluidRow中的元素
r、shiny
我有一个闪亮的应用程序，在一个fluidRow中有一些元素。基于登录，我需要显示/隐藏这些元素。但是，一旦我隐藏了它们，fluidRow中元素的对齐就会受到影响。
library(shiny)
library(shinyjs)
ui <- fluidPage(
shinyjs::useShinyjs(),
fluidRow( align = 'center',
column(3, align="center", actionButton('b1', 'Button 1')),
column(3, al
浏览 15提问于2021-12-30得票数 2
回答已采纳
1回答
暗箱背景
r、shinydashboard
我不明白为什么背景色不适合我的shinydashboard应用程序。每个框应该只包含指向链接的标题、描述和按钮，但是尽管遵循github页面()的示例，我的页面没有显示颜色。任何帮助，为什么是非常感谢的。下面是示例代码。
{
library('shiny')
library('shinydashboard')
}
# UI
ui<-fluidPage(
titlePanel("Sample Code"),
fluidRow(
column(6
浏览 0提问于2018-05-16得票数 0
回答已采纳
1回答
内联显示文件输入和动作按钮
r、shiny、shinydashboard、shinyjs
我试图建立一个应用程序使用R闪亮，在这里，我使用文件输入和动作按钮在同一个框。我面临的问题，显示以上两个内联。请参阅下面的工作示例：
library(shiny)
library(shinydashboard)
ui <- dashboardPage(
dashboardHeader(title = "Inline Widgets Issue"),
dashboardSidebar(
),
dashboardBody(
box(title = "Working Example",width=40 ,status = "
浏览 0提问于2018-05-25得票数 0
回答已采纳
1回答
如何微调在r闪亮中呈现的物体的位置？
css、r、shiny、formatting
我试着调整有条件渲染的物体在R中的位置。当运行下面的框架代码并单击" delete“操作按钮时，我希望将有条件呈现的文本(”selectInput to delete >>“)稍微推到右边，并将也有条件地出现在最右边的小selectInput()框移到左边，更接近”series to delete>>“。我已经摆弄了列宽等，我已经用尽了所有我知道的格式选项，这些选项都是有限的。对于微调这些物品的位置有什么建议吗？我的猜测是，这将涉及一些CSS，我几乎一无所知。
骨架代码：
library(dplyr)
library(shiny)
library(shinyjs
浏览 1提问于2022-10-13得票数 2
回答已采纳
2回答
输入与标签和ActionButton垂直对齐在fluidRow中
r、shiny、shinydashboard
在我的shinydashboardPlus应用程序中，我使用fluidRow/column来指定布局。有时，我有一个或几个textInput / selectInput和一个actionButton。因为输入元素确实有标签，所以它们垂直地比按钮大，按钮看起来不太好。例如：
是否有一种简单的方法可以将actionButton移动到较低的位置，以便它与“本地”元素保持一致？
下面是一个很小的例子：
library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
ui <- shinydashboardPlus:
浏览 5提问于2021-12-31得票数 0
回答已采纳
1回答
如何在一个闪闪发亮的应用程序的分部上添加x-滚动？
html、r、shiny
下面的代码应该添加无穷无尽的列，滚动条应该出现在底部。但是滚动条不在这里工作。请帮忙..。
library(shiny)
ui <- fluidPage(
fluidRow(
actionButton("addCol","Add New Column"),
div(style="overflow-x: auto;",
uiOutput("myUI")
)
)
)
server <- function(input, output, session) {
alld
浏览 1提问于2019-01-16得票数 0
回答已采纳
1回答
当反应值出现时，请帮助我重复显示微调器(当单击操作按钮时)
UI.R
library(shinycssloaders)
ui <- fluidPage(
titlePanel("Hello Shiny!"),
fluidRow(
column(width = 2, actionButton("actButton", "Click")),
column(width = 6, withSpinner(uiOutput("htmlExample")))
)
)
SERVER.R
library(shin
浏览 0提问于2018-04-19得票数 3
1回答
编辑R中弹出的Modal内容
r、shiny
我想编辑的内容的模式弹出在R发亮。下面是我的代码，我可以用它在模式弹出中打印值，但是我无法编辑它。
Server.R
modelnetlist <- function(failed = FALSE){
netlistdata <- readLines('run.scs')
splitText1 <- stringi::stri_split(str = netlistdata, regex = '\\n')
# wrap a paragraph tag around each element in the li
浏览 2提问于2021-01-06得票数 0
回答已采纳
1回答
我可以编写一个简洁的基于行的闪亮UI吗？
r、layout、shiny
尝试编写一个闪亮的应用布局，包括用于输入的行和列。内置函数最适合简单的列格式。到目前为止，我们成功地嵌套了大量的fluidRow，以获得下面示例代码中的输出。 嵌套fluidRow：R Shiny - how to generate this layout with nested rows in column 2 shiny 4 small textInput boxes side-by-side 下面是我的代码的一个子集： ui <- fluidPage(
h1("XXX"), #Main page title
fluidRow(
column(3,
浏览 4提问于2019-04-17得票数 0
1回答
根据内容调整闪亮的WellPanel大小并放置关闭按钮
r、layout、shiny
我最近开始学习闪亮，我正在玩弄wellPanels。我正在尝试创建一个wellPanel，它将不会超过其内容所需的大小。我已经成功地获得了以下内容：
但是还没有找到一种方法来消除wellPanel的右侧额外空间。如果可能的话，我也想把"X“按钮放在wellPanel的右上角。有没有办法做到这一点？提前感谢！
以下是工作代码：
library(shiny)
ui <- fluidPage(
fluidRow(column(width = 6,
wellPanel(
fluidRow(
浏览 1提问于2018-08-03得票数 0
1回答
如何在闪亮应用程序的侧边栏中设置同一行小部件之间的距离
r、shiny
下面有一个闪亮的仪表板，我想在操作按钮之间设置特定的距离。边栏的宽度越大，它们之间的空间就越大，但我想用更标准的方式设置它。
library(shiny)
library(shinydashboard)
ui <- dashboardPage(
header = dashboardHeader(title = "My dashboard"),
sidebar = dashboardSidebar(width=1000,
fluidRow(
column(2,
div(styl
浏览 1提问于2020-06-08得票数 0
回答已采纳
1回答
希望自定义R中按钮的外观
html、css、r、shiny
我对我正在开发的应用程序中默认动作按钮的外观不满意。下面包含了一些示例代码。我不知道从哪里开始学习如何调整HTML和CSS方面的闪亮，以实现我想要的。
我正在寻找关于如何改进这些按钮布局的建议。
默认情况下，按钮的外观如下。
这是我希望按钮被安排的方式。
工作样本代码包括：
library(shiny)
library(shinydashboard)
# UI ----------------------------------------------------------------------
# Header
Header
浏览 6提问于2016-12-02得票数 2
回答已采纳
2回答
一个Action按钮有两个输出
r、shiny、shiny-reactivity
我正在尝试使用R Shiny中的一个操作按钮来启动一个运行缓慢的JAGS模型。我希望当用户第一次点击按钮时出现一些文本，显示他们按下按钮的时间，这样他们就知道发生了什么事情。 到目前为止，操作按钮正在工作，但它要等到运行缓慢的模型完成后才能显示模型输出和文本。 我研究了以下问题，但它们似乎没有回答我的问题，至少在我理解的方式下没有回答：R Shiny execute order Pattern for triggering a series of Shiny actions 我是个新手，所以我希望这是一个简单的问题。 Run.me <- function(a){
# some fake
浏览 34提问于2019-02-21得票数 1
回答已采纳
2回答
闪闪发光的直插式按钮
r、shiny
有没有人能帮我把这个按钮垂直地和其他输入小部件放在一起(视觉上，而不是css意义上)？
require(shiny)
ui = fluidPage(
verticalLayout(
fluidRow(style = "background-color: orange;",
column(3, actionButton('button', 'A button')),
column(3, textInput('text', 'text', width = '100%&#
浏览 0提问于2018-10-11得票数 0
1回答
使用lapply和insertUI对重复的闪亮模块进行排序
r、shiny、shinyapps、shiny-reactivity、shinymodules
我创建了一个闪亮的应用程序(出于演示目的，可重现)，其中ui通过单击"Load"-button创建一些数据(DataPack) (包含两个元素的列表)。该列表中的每个元素都是使用server函数中的lapply通过模块绘制的。 这个应用程序可以工作，但是，绘图是以相反的顺序出现的(DataPack$two和rnorm(n)^2，DataPack$one和rnorm(n))，但预计会显示为调用(lapply(names(DataPack()), function(DataSetName) {...}))。我如何按照给定的顺序修复这个/重复调用模块?该行为的解释是什么？ libr
浏览 13提问于2020-04-15得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
即时通信 IM
对象存储活动推荐
腾讯云开发者
