r - Shiny のデータテーブル (DT) からのフィルター処理されたデータの列選択とさらにプロット

Question

Shiny のデータテーブル (DT) について 2 つの質問がありますが、現時点では答えが見つかりませんでした。

データテーブルの行ではなく列を選択したい->試しました（公式ウェブサイト 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

私は次のようなオプションsmthg内で試しました：

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

それも機能していませんでした...

誰にもアイデアはありますか??

2 つ目は、この選択した列を使用して、ggplot を使用してライン プロットとヒストグラムをプロットすることです。

アイデアをお寄せいただきありがとうございます