例を示します。あとは類推してください。 本稿の折れ線グラフの例とlog(x)/x のグラフを並べたものです。
list1:makelist([i,float(length(divisors(i))/i)],i,1,500); plot2d([log(x)/x,[discrete,list1]],[x,1,500]);
関数を複数と折れ線も複数を並べることもできます。 (以下の例は例として以外にはそんなに面白い例ではありませんが...)
list1:makelist([i,float(length(divisors(i))/i)],i,1,500); list2:makelist([i,float(length(divisors(i))/15)],i,1,500); plot2d([log(x)/x,x/500,[discrete,list1],[discrete,list2]],[x,1,500]);