折れ線を描くには、次のような命令も使えます。 (tcl/tk の wish を外部コマンドとして使用します。)
openplot_curves([[x_1,y_1],[x_2,y_2],...,[x_n,y_n]]);
[[x_1,y_1],[x_2,y_2],...,[x_n,y_n]]
は点のリストで、
これを直接入力するのは実際には容易でないので、
makelist などを援用するとよいでしょう。
openplot_curves([makelist([i,float(length(divisors(i))/i)],i,1,500)]);
xgraph がインストールされている場合には xgraph_curves という命令も使えます。
xgraph_curves([makelist([i,float(length(divisors(i))/i)],i,1,500)]);