グラフを磨き上げる

以下のコードは、国ごとの幸福度とソーシャル・サポート指数の対話的なプロットを作成し、プロット記号で各国の所得区分を表します。

happy %>%
  plot_ly(x = ~social.support, y = ~happiness,
  hoverinfo = "text",
  text = ~paste("Country: ", country)) %>%
  add_markers(symbol = ~income, symbols = c("circle-open", "square-open", "star-open", "x-thin-open"))

あなたのタスクは、読者が情報をより理解しやすくなるように、ホバー情報と軸ラベルを編集することです。

plotly と happy データセットは読み込まれています。

income グループ、happiness スコア、social.support 指数のホバー情報を追加します。
すべての数値変数をホバー情報内で小数点第2位まで丸めるために、round(<variable>, 2) を使います。
x軸ラベルを "Social support index"、y軸ラベルを "National happiness score" に変更します。