【问题标题】:how I can align to the left on shiny?我怎样才能在闪亮时向左对齐?
【发布时间】:2021-12-15 21:46:36
【问题描述】:

您好,感谢您阅读我的文章

我正在制作一个闪亮的条形图,我希望它从左侧显示,中间没有空格,也就是说,我想删除以下空格并让图表从那里开始:

有没有办法做到这一点?我的代码如下:

library(shiny)
library(dplyr)
library(echarts4r)

shinyApp(
  ui = fixedPage(
    column(12, align="center", offset = 0,
           echarts4rOutput(
             "grafico", width = 1500, height = 350
           )
    )
    
  ),
  server = function(input, output){
    
    
    output$grafico <- renderEcharts4r({
      mtcars |>
        tibble::rownames_to_column("model") |> 
        mutate(total = mpg + qsec) |>
        arrange(desc(total)) |>
        e_charts(model) |>
        e_bar(mpg, stack = "grp") |>
        e_bar(qsec, stack = "grp")
      
    })
    
  }
)

【问题讨论】:

    标签: r shiny echarts4r


    【解决方案1】:

    这是一种丑陋的修复,但它有效: (请注意,我将fixedPage更改为fluidPage。我还添加了一个div来封装您的echarts4rOutput)

    library(shiny)
    library(dplyr)
    library(echarts4r)
    
    shinyApp(
      ui = fluidPage(
        fluidRow(
          column(
            12,
            tags$div(
              style = "margin-left: -75px", offset = 0,
              echarts4rOutput(
                "grafico", width = 1080, height = 350
              )
            )
          )
        )
      ),
      server = function(input, output){
    
    
    output$grafico <- renderEcharts4r({
      mtcars |>
        tibble::rownames_to_column("model") |> 
        mutate(total = mpg + qsec) |>
        arrange(desc(total)) |>
        e_charts(model) |>
        e_bar(mpg, stack = "grp") |>
        e_bar(qsec, stack = "grp")
      
    })
    
    
    
     }
    )
    

    【讨论】:

      猜你喜欢
      • 1970-01-01
      • 1970-01-01
      • 2011-09-06
      • 1970-01-01
      • 1970-01-01
      • 2013-12-26
      • 2019-03-29
      • 1970-01-01
      • 2021-09-16
      相关资源
      最近更新 更多