如何通过右键菜单导出rhandsontable时仅选择特定列存为CSV

以下是修改后的代码，实现仅导出指定列（示例中为第1、3、5列，对应JS索引0、2、4）的功能：

library(rhandsontable)
MAT = matrix(rnorm(50), nrow = 10, dimnames = list(LETTERS[1:10],
                                                   letters[1:5]))

rhandsontable(MAT, width = 550, height = 300) %>%
  hot_context_menu(
    customOpts = list(
      csv = list(name = "Download to CSV",
                 callback = htmlwidgets::JS(
                   "function (key, options) {
                      // 指定要导出的列索引（JS中列从0开始计数，对应第1、3、5列）
                      const targetCols = [0, 2, 4];
                      const hot = this;
                      let csv = '';

                      // 处理表头
                      const headers = hot.getColHeader();
                      const filteredHeaders = targetCols.map(idx => headers[idx]);
                      csv += filteredHeaders.join(',') + '\\n';

                      // 处理表格数据行
                      const rowCount = hot.countRows();
                      for (let i = 0; i < rowCount; i++) {
                        const rowData = hot.getDataAtRow(i);
                        const filteredRow = targetCols.map(idx => rowData[idx]);
                        // 给包含逗号的内容加引号，避免CSV格式错误
                        const quotedRow = filteredRow.map(cell => {
                          if (typeof cell === 'string' && cell.includes(',')) {
                            return `"${cell}"`;
                          }
                          return cell;
                        });
                        csv += quotedRow.join(',') + '\\n';
                      }

                      // 下载逻辑保持不变
                      var link = document.createElement('a');
                      link.setAttribute('href', 'data:text/plain;charset=utf-8,' +
                        encodeURIComponent(csv));
                      link.setAttribute('download', 'data.csv');

                      document.body.appendChild(link);
                      link.click();
                      document.body.removeChild(link);
                    }"))))

关键修改说明 #

• 指定目标列：通过targetCols数组定义要导出的列索引，注意JavaScript中列索引从0开始，示例的第1、3、5列对应[0,2,4]，可根据需求自行调整。
• 筛选表头和数据：使用map方法从原始表头和每行数据中提取目标列的内容，确保只保留需要导出的部分。
• CSV格式兼容：增加了对包含逗号的字符串添加双引号的处理，避免导出的CSV出现格式错误。
• 下载逻辑：保持原代码的下载流程不变，仅替换了CSV内容的生成方式。

内容的提问来源于stack exchange，提问作者missuse