小编mos*_*915的帖子

我正在尝试在Oracle中创建一个CTE,它不会从现有表中进行选择,而是将数据插入其中.目前,我正在创建一个表,然后在查询完成后删除它.有没有办法创建一个有效地做同样事情的CTE？这是我目前的代码:

create table RTG_YEARS
(YR date);

insert into RTG_YEARS values (to_date('2013-01-01', 'yyyy-mm-dd'));
insert into RTG_YEARS values (to_date('2013-12-31', 'yyyy-mm-dd'));
insert into RTG_YEARS values (to_date('2014-01-01', 'yyyy-mm-dd'));
insert into RTG_YEARS values (to_date('2014-12-31', 'yyyy-mm-dd'));
insert into RTG_YEARS values (to_date('2015-01-01', 'yyyy-mm-dd'));
insert into RTG_YEARS values (to_date('2015-12-31', 'yyyy-mm-dd'));

我正在尝试在 DT 表的行中包含闪亮的小部件，例如 textInput、selectInput（单个）、sliderInput 和 selectInput（多个）。当小部件直接在页面上时，它们可以正确显示，但是，当它们放入表格中时，其中一些不能正确显示。

textInput 很好， selectInput (single) 除了一些 css 差异外大部分都很好，但是 selectInput (multiple) 显示不正确，sliderInput 肯定显示不正确。依赖 javascript 的小部件似乎有问题。有没有办法让这些小部件在 DT 表中正常工作？

这是我的可重现示例。我将这些小部件放入表格时使用了原始 HTML，但我直接从每个小部件的闪亮函数生成的 HTML 中获取了它。

library(shiny)
library(DT)

ui <- fluidPage(
  h3("This is how I want the widgets to look in the DT table."),
  fluidRow(column(3, textInput(inputId = "text",
                               label = "TEXT")),
           column(3, selectInput(inputId = "single_select",
                                 label = "SINGLE SELECT",
                                 choices = c("", "A", "B", "C"))),
           column(3, sliderInput(inputId = "slider",
                                 label = "SLIDER",
                                 min = 0,
                                 max = 10,
                                 value = c(0, …