r - Shiny でテキスト URL の列をアクティブなハイパーリンクに変換する

Question

パスウェイ エンリッチメント プログラムのユーザー インターフェイスを作成しています。結果は以下の表のとおりです。

以下は、DT::renderDataTable と DT::datatable を使用してタブにテーブルを出力していることを示すスニペットです。spia_out() は、経路エンリッチメントを実行してデータフレームを生成する単なるリアクティブ関数です。

spia_out <- reactive({
    ...get results in a dataframe...
  })

output$spiaout <- DT::renderDataTable({
      DT::datatable(spia_out(), extensions = ..., options = ...)
  })

すべてが正常に機能し、パスウェイ エンリッチメント テーブルが生成され、対応する UI 要素に出力されます。私の唯一の問題は、URL の最後の列 (KEGGLINK) をアクティブなハイパーリンクに変換する方法です。コピーして貼り付けるのではなく、クリックするだけで済むようにします。

スクリーンショットのサイズについて事前にお詫び申し上げます。最後の列を見るとわかると思いますが、KEGGLINK には URL がありますが、アクティブではありません。