r - R: networkD3 プロットにタイトルを追加して保存

Question

NetworkD3 で作成したforceNetworkグラフにタイトルを追加し、magrittrで html をエクスポートすることに興味があります。

タイトルを追加するために、 R: HTML タグ オブジェクトのヘルプ ページに解決策が見つかりました。次に、 「networkD3 プロットの背景色を変更する」 StackOverflow の質問 - @timelyportfolio からの回答に htmltoolbrowsable()パラメータを追加するように指示されました。

以下に、タイトルを追加し、次にタイトルなしでネットワークを保存し、最後に 2 つを結合しようとする非動作の試みの最小限の動作例を示します。

library(networkD3)
library(htmltools)

# Load data
data(MisLinks)
data(MisNodes)

# Plot with title in R Viewer
browsable(
  tagList(
    tags$h1("Title"),
      forceNetwork(Links = MisLinks, Nodes = MisNodes,
                   Source = "source", Target = "target",
                   Value = "value", NodeID = "name",
                   Group = "group", opacity = 0.8)
  )
)

magrittr を使用してタイトルなしで保存できますが%>%：

library(magrittr)

# Plot and save to Mis.html
forceNetwork(Links = MisLinks, Nodes = MisNodes,
                 Source = "source", Target = "target",
                 Value = "value", NodeID = "name",
                 Group = "group", opacity = 0.8)%>%  
      saveNetwork(file = 'Mis.html')

次のエラーが発生せずに2つを組み合わせるのに問題があります。

#Plot with title and save to title_Mis.html
browsable(
  tagList(
    tags$h1("Title"),
      forceNetwork(Links = MisLinks, Nodes = MisNodes,
                   Source = "source", Target = "target",
                   Value = "value", NodeID = "name",
                   Group = "group", opacity = 0.8)
  )
)%>%  
  saveNetwork(file = 'title_Mis.html')

system.file(config, package = package) のエラー:
'package' の長さは 1 でなければなりません

これが単純なデバッグである場合は申し訳ありませんが、私はプログラマーではありません。