A plotter.

rstats.erl

-module(rstats).
-export([plot/1]).
-define(TMP_FILE, "/tmp/erlstats.data").
-define(R_FILE, "/tmp/erlstats.R").

plot(Points) ->
    ok = file:write_file(?TMP_FILE,
                         [io_lib:format("~p~n", [X]) || X <- Points],
                         [write]),
    Rprogram = ["erl <- read.table(\"", ?TMP_FILE, "\")", "\n",
                "plot(erl$V1)", "\n",
                "dev.off()\n"],
    ok = file:write_file(?R_FILE, Rprogram, [write]),
    os:cmd(["R CMD BATCH " | ?R_FILE]).