R数据表中的正交数据（DT :: datatable）

Question

是否可以添加正交数据以按R数据表中的列进行排序（仅采用2D数据。帧或矩阵）？

我为我的闪亮应用程序制作了一个数据表，它可以获取PubMed数据并为用户显示它。我正在获取我的referencedBy列的HTML链接列表（它们是链接到NCBI网页的数字）。但是，排序功能不会通过数字类型排序。所以我试图像这样添加正交数据：

server.R

output$Manuscript <- renderDataTable(datatable({
    dat <- publication_fetch(author_list)
    citedBy <<- dat$citedBy
    pattern <- "</?\\w+((\\s+\\w+(\\s*=\\s*(?:\".*?\"|'.*?'|[^'\">\\s]+))?)+\\s*|\\s*)/?>"
    num <<- NULL
    for(item in citedBy){
        plain.text <- gsub(pattern, '', item)
        plain.num <- as.numeric(plain.text)
        num <- c(num, plain.num)
      }

    dat
    },
    filter = "top",
    escape = FALSE,
    rownames = NULL,
    style = 'bootstrap'),
    options = list(
      columnDefs = list(
        list(
          target = 6,
          display = citedBy,
          sort = num
        )
      )
    ))

我有一种感觉我错误地实现了它，并且这些数据表选项甚至可能不适用于R中的2D data.frames和矩阵。我正在寻找解决此问题的解决办法或其他可能的解决方案问题。