折れ線グラフや関数のグラフを重ねる

例を示します。あとは類推してください。 本稿の折れ線グラフの例と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]);