#! /bin/sh

if test $# -eq 1; then
  $0 $1 $1
fi

if test $# -ne 2; then
  echo Usage: streak-n n
  exit 0;
fi

./streak $1 > streak.data
echo n = $1, k = 0 to $1
gnuplot << EOF
set grid
set title "k-head streak in $1-seq."
set xlabel "Streak length (k)"
set ylabel "Probability"
set data style lines
set terminal postscript eps color solid "HelveticaBold" 40
set output "streak.eps"
set ytics .25
set nokey
#set y2tics 
plot [*:$2] [0:1] "streak.data" using 4:6 lw 10
#plot [*:$2] [0:1] "streak.data" using 4:6, (1-(1 - 1/2**(x-1))**($1/4)) ,"streak.data" using 4:8 axes x1y2
EOF
gv streak.eps