小编Jon*_*mon的帖子

感觉它必须是可能的,但我无法弄清楚我是否可以相对简单地做到theme()或者必须深入挖掘.

我想围绕我的阴谋区域的角落ggplot2.我该怎么做呢？

问题的灵感来自:https://twitter.com/Hoog10HK/status/951305194809143296

我在带有 RHEL 7.6 的 AWS 服务器上运行带有 R 3.5.1 的 RStudio 1.1.456（请参阅下面的 sessionInfo）。我第一次（每个会话）调用 Sys.timezone() 时出现错误：

> Sys.timezone()
Failed to query server: Connection timed out
[1] "America/Chicago"
Warning message:
In system("timedatectl", intern = TRUE) :
  running command 'timedatectl' had status 1

随后它运行良好：

> Sys.timezone()
[1] "America/Chicago"

但是 system("timedatectl") 继续失败：

> system("timedatectl", intern = TRUE)
Failed to query server: Connection timed out
character(0)
attr(,"status")
[1] 1
Warning message:
In system("timedatectl", intern = TRUE) :
  running command 'timedatectl' had status 1

从命令行，据我所知，一切都很好：

# timedatectl …

我正在为shinydashboard做最后的润色.仪表板使用googleAuthR通过google oauth进行身份验证.一切正常......但我现在必须将登录按钮放在dashboardSidebar或dashboardBody中,我真的很喜欢它在dashboardHeader中的下拉菜单.不幸的是,似乎shinydashboard的标题对标题中的内容很挑剔.将东西放在那里是否存在黑客攻击(或者不是黑客攻击)？

这是一个绝对不起作用的东西,例如:

ui = dashboardPage(
  dashboardHeader(
    title = "My Awesome Dashboard"
    , p('Pretend this is a login button')
  )
  , dashboardSidebar(
    p('I don't want the login here.')
  )
  , dashboardBody(
    p('I don't want the login here either.')
  )
)

server = function(input, output, session) {
}

shinyApp(
  ui = ui
  , server = server
)