ドキュメントには一切触れられていないけど、現在精力的に開発が進められている標記のプロットについて、とりあえず試してみた。参考資料は以下のgist。

まず、今のところGitHub上の開発版が必要。以下からインストール:

devtools::install_github("rich-iannone/DiagrammeR")
devtools::install_github("rich-iannone/DiagrammeRsvg")

さっそく作図してみる:

library(DiagrammeR)
library(DiagrammeRsvg)
library(magrittr)

create_xy_pts(
  series_label = "Sepal",
  x = iris$Sepal.Length,
  y = iris$Sepal.Width,
  line_width = 1.0,
  width = 0.2,
  height = 0.2,
  shape = "triangle",
  fill_color = "#00c5cd70",
  line_color = "#00868b70"
) %>%
  create_xy_graph(
    x_name = "Sepal.Length",
    y_name = "Sepal.Width",
    heading = c("#Sepalの関連性をプロット",
                "####2016/02/12"),
    footer = "###そのままプロットしてみた"
  ) %>% render_graph

設定項目が大量にあるっぽい。あとちらっとGitHubのソースコードを見る限り、金額とかの単位にも自動的に対応してるっぽい。わりと簡単に作れるかもしれないので、今後余裕があったら検証してみる。

Enjoy!