Css 将选项卡放置在右侧的闪亮选项卡面板中

默认情况下，

选项卡集面板

中的选项卡放在左侧。是否可以在右侧放置一个选项卡，而左侧仍有其他选项卡？所以看起来像这样

库（闪亮）
ui当您将类
向右浮动
应用于您想要向右浮动的对象时，它应该可以做到这一点。
也许您可以创建2个
选项卡集面板
，并将其拉到右侧

rm(list = ls())
library(shiny)
ui <- fluidPage(
  div(style="display:inline-block",tabsetPanel(type = c("pills"),tabPanel("tab_left1"),tabPanel("tab_left2"))),
  div(style="display:inline-block;float: right",tabsetPanel(type = c("pills"),tabPanel("tab_right")))
)

server <- function(input, output, session) {}

shinyApp(ui, server)

rm（list=ls（））
图书馆（闪亮）
ui使用
右浮动
应该确实有效。使用2
tabsetPanel
的问题是，同时有2个活动选项卡

library(shiny)

ui <- fluidPage(
  tags$head(
    tags$style(HTML(
      ".tabbable ul li:nth-child(3) { float: right; }"
    ))
  ),
  tabsetPanel(
    tabPanel("tab_left1"),
    tabPanel("tab_left2"),
    tabPanel("tab_right")
  )
)

server <- function(input, output, session) {}

shinyApp(ui, server)

库（闪亮）
谢谢你的主意。我在UI中添加了
tags$style（HTML（“.tabbable>.nav>li>a[data value='tab\u right']{float:right}”）
，但它不起作用。发生了什么？
library(shiny)

ui <- fluidPage(
  tags$head(
    tags$style(HTML(
      ".tabbable ul li:nth-child(3) { float: right; }"
    ))
  ),
  tabsetPanel(
    tabPanel("tab_left1"),
    tabPanel("tab_left2"),
    tabPanel("tab_right")
  )
)

server <- function(input, output, session) {}

shinyApp(ui, server)