Question

我有一个用于查询的简单查询。

requests
| project name

这给了我

name
----
foo
bar
baz

我想修改查询以添加额外的一行，例如：

requests
| project name
| print("qux")

这将给出：

name
----
foo
bar
baz
qux

这可能吗？我不能只添加实际数据，真正的原因是出于报告目的。我只需要编写一个查询，即可得到上面列出的最后结果。

Answer 1

您可以使用“数据表”使用所需的行创建一个自定义表，然后使用“联合”运算符添加该行：

var headings = $('#table thead th');
headings.each(function() {
  alert(this.id);
});

还可以从“打印”开始：

ui <- fluidPage(titlePanel(""),
                sidebarLayout(
                  sidebarPanel(
                    # adding the new div tag to the sidebar            
                    tags$div(class="header", checked=NA,
                             tags$h4(strong("Duty"))),
                    selectInput('id1', 'Feed rate (m^3/h)', c("All", main$metric[1:3])),
                    selectInput('id2', 'Operation', c("All", main$metric[4:5])),
                  mainPanel(DT::dataTableOutput("table"))
                ))

如何在查询结果的末尾添加自定义行

1 个答案: