-->
Sinus en échelle logarithmique
Ymin = -1
Ymax = 1
Xmin = -0.2
Xmax = 4.2
trait = 0.3
couleur = bleu
for(i=1;i<17000;i++){
point([ln(i)/ln(10),sin(i)])
}
couleur = noir
trait = 1
trS(10)
trS(100)
trS(1000)
trS(10000)
traceX()
traceY()
function trS(n){
abs = ln(n)/ln(10)
segment([abs,-0.02],[abs,0.02])
texte( n, [abs*(1-0.08),-0.1] )
}