小编MoK*_*oKG的帖子

有什么方法可以在闪亮的应用程序中使Flexdashboard仪表更大吗？

我试图更改UI中的宽度和高度，但这只是在仪表板上移动它。它不会使它变大。

library(shiny)
library(flexdashboard)

fluidRow(column(
         width =  12,
           gaugeOutput('Scale', width = "800px", height = "400px")
       )
)

我正在尝试使用 httr 库获取 100 多个站点的状态，但我不断收到此错误：

Error in x %||% list() : argument "p" is missing, with no default. 

Run Code Online (Sandbox Code Playgroud)

我有一个包含所有站点名称的数据框。这是给我错误的行

for(i in names)
{

  if(i != "")
  {
    URL <- GET(paste("http://",i,"", sep = "" ),set_config(config(ssl_verifypeer = 0L)),timeout(500))

    if(status_code(URL) == "200")
    {
      r <- "Active"
    }
    else
    {
      r <- "Not active"
    }
    r
    print(paste(i,r))
    all_stat <- rbind(all_stat,r) 
  }

}