13 lines
381 B
Erlang
13 lines
381 B
Erlang
-module( plot_coordinate_pairs ).
|
|
|
|
-export( [task/0, to_png_file/3] ).
|
|
|
|
task() ->
|
|
Xs = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9],
|
|
Ys = [2.7, 2.8, 31.4, 38.1, 58.0, 76.2, 100.5, 130.0, 149.3, 180.0],
|
|
File = "plot_coordinate_pairs",
|
|
to_png_file( File, Xs, Ys ).
|
|
|
|
to_png_file( File, Xs, Ys ) ->
|
|
PNG = egd_chart:graph( [{File, lists:zip(Xs, Ys)}] ),
|
|
file:write_file( File ++ ".png", PNG ).
|