# generic commands for twographbox output size
load "twographbox.in"
set data style lines
set xlabel "Discount factor {/Symbol g}"
set ylabel "Iterations required"
set xrange [0.5:0.99999]
set logscale y 10
#set yrange [0:1]
#set nokey
set samples 1000
#show samples
iterations(x,c) = ceil(log(2/(c*(1-x)))/log(1/x))
set output "discount-iterations.eps"
plot iterations(x,0.0001) title "{/Times-Italic c} = 0.0001" lw 2, iterations(x,0.001) title "{/Times-Italic c} = 0.001" lw 2, iterations(x,0.01) title "{/Times-Italic c} = 0.01" lw 2, iterations(x,0.1) title "{/Times-Italic c} = 0.1" lw 2