在 Shiny 中从数据表 (DT) 中选择列并进一步绘制过滤数据答案

【问题标题】：Column selection and further plotting of filtered data from datatable (DT) in Shiny在 Shiny 中从数据表 (DT) 中选择列并进一步绘制过滤数据
【发布时间】：2016-04-19 20:00:24
【问题描述】：

我有两个关于 Shiny 中的数据表 (DT) 和直到此刻我找不到任何答案。

我想在数据表中选择列而不是行 --> 我试过了（官方网站上写的http://rstudio.github.io/DT/shiny.html）：

datatable(..., selection = list(target = 'column'))

在我的代码中::

datatable(data[, c("Datum", "Kunde", "Block.Nr.", "Toleranz", 
                        "Kaliberschema")], class = 'cell-border stripe', 
               rownames=FALSE, filter="top", selection = list(target = 'column'), options = list(lengthChange = FALSE, columnDefs = list(list(width = '200px', targets = "_all"), list(bSortable = FALSE, targets = "_all"))), callback=JS("
           //hide column filters for two columns
            $.each([0, 1], function(i, v) {
            $('input.form-control').eq(v).hide()});", 
            "var tips = ['Datum von..bis', 'Kunde', 'Block.Nr.',
            'Toleranz +', 'Kaliberschema'],
            header = table.columns().header();
            for (var i = 0; i < tips.length; i++) {
            $(header[i]).attr('title', tips[i]);}")) %>%
        formatStyle("Datum",  color = 'red', backgroundColor = 'lightyellow', fontWeight = 'bold')})

这段代码根本不工作，只是得到一个错误：

Error in match.arg(selection) : 'arg' must be NULL or a character vector

比我在这样的选项中尝试过的：

options = list(target = 'column', lengthChange = FALSE, columnDefs = list(list(width = '200px', targets = "_all")...

它也没有工作......

有人有什么想法吗？

第二件事是我希望使用这个选定的列来使用 ggplot 绘制线图和直方图。

提前感谢您的任何想法

【问题讨论】：

您的datatable 上发生了很多事情。没有可重复的示例很难确定问题所在。你试过评论options和formatStyle吗？当这些部分被评论时，选择列仍然不起作用吗？关于第二个问题，您可以使用input$tableId_columns_selected。

标签： r datatable shiny dt

【解决方案1】：

您使用的是来自 github 的最新开发版本 DT 还是来自 CRAN 的 2015 v0.1 软件包版本？您的错误表明后者；您选择的选项可能根本不可用。对于从 github 安装，您可以从 CRAN 安装 devtools 包并通过library(devtools);install_github("rstudio/DT") 继续。或者甚至更好：询问作者何时可以通过 CRAN 获得该软件包，因为这种混乱已经在其他地方出现了......

【讨论】：