Moving tabPanel to the far right!

[SerkanK]

Hi,

I have a tabPanel that I want to have in the far right of the navBar such that it always stays to outmost right point of the browser. I have added a minimal working example with my code!
Any help is appreciated. I have no knowledge of CSS, Java and HTML coding what so ever!

My best wishes,

Serkan

library(shiny)

ui <- navbarPage(
    title = "Title",
     tabPanel(
        title = "Pin me to the FAR FAR right please!",
        column(
            h1("Upload"),
            width = 12,
            fileInput(
                inputId = "Update",
                label = NULL,
                multiple = TRUE,
                accept = ".csv",
                placeholder = "Drag and Drop",
                width = "100%"
            )
        ),
        icon = icon("cloud-upload-alt", lib = "font-awesome")
        
    ),
    
    tabPanel(
        title = "Upload Filer",
        column(
            h1("Upload"),
            width = 12,
            fileInput(
                inputId = "Update",
                label = NULL,
                multiple = TRUE,
                accept = ".csv",
                placeholder = "Drag and Drop",
                width = "100%"
            )
        ),
        icon = icon("cloud-upload-alt", lib = "font-awesome")
        
    )
)

server <- function(input, output, session) {
}
runApp(list(ui = ui, server = server))

[woodward]

I found this answer on StackOverflow.

https://stackoverflow.com/questions/43243679/how-to-move-one-of-the-tabpanel-to-the-right-the-webpage-in-shiny-app

Add this line after the second tabPanel

tags$head(tags$style('.navbar-nav {width: 95%;}
                                    .navbar-nav :first-child{float:right}'))

[SerkanK]

Hi Woodward,

Thank you for your reply. I have seen this reply already, and I should have linked it in my post. However, although it produces the desired output, it distorts the icons in the tabs such that all icons are moved to the right of the tab. This is not what I intend to do.

Best