#!/bin/csh -f

# ======================================================================
# David W. Aha
# 5/24/1993
# Example call of my coding of NGE for the breast cancer "problem"
# ======================================================================

# # Create the data sets
# set i = 1 
# while ($i <= 10)
#   ~/software/unixstat/perm < results/breast-cancer/data > b
#   head -200 < b > results/breast-cancer/train.$i
#   tail -86 < b > results/breast-cancer/test.$i
#   /bin/rm b
#   @ i = $i + 1
# end

# Run the algorthm
echo 'Algorithm NGE:' 
set num_seeds = 5 
set seed = 1

while ($num_seeds < 200)
  echo -n 'Number of seeds: '
  echo $num_seeds
  set i = 1
  while ($i <= 10)
    nge results/breast-cancer/namesfile results/breast-cancer/train.$i results/breast-cancer/test.$i results/breast-cancer/out.$num_seeds.$i $num_seeds $seed -testrate 2000 -testlast 
    @ seed = $seed + 1
    @ i = $i + 1
  end
  @ num_seeds = $num_seeds + 5
end

# Collect all the results
set num_seeds = 5 
while ($num_seeds < 200)
  echo -n 'Number of seeds: '
  echo $num_seeds
  set i = 1
  awk '/percent/ {print $1}' results/breast-cancer/out.$num_seeds.1 > results/breast-cancer/results.$num_seeds
  while ($i <= 10)
    awk '/percent/ {print $1}' results/breast-cancer/out.$num_seeds.$i >> results/breast-cancer/results.$num_seeds
    @ i = $i + 1
  end
  # Now have set of 10 results in this file
  ~/software/unixstat/pair < results/breast-cancer/results.$num_seeds >> results/breast-cancer/results.$num_seeds
  @ num_seeds = $num_seeds + 5
end  

# Put all summary results into one file
set num_seeds = 5
while ($num_seeds < 200)
  echo -n $num_seeds >> results/breast-cancer/all-results-1symbolic
  echo -n ' ' >> results/breast-cancer/all-results-1symbolic
  awk '/Means/ { print $3}' results/breast-cancer/results.$num_seeds >> results/breast-cancer/all-results-1symbolic
  @ num_seeds = $num_seeds + 5
end

/bin/rm results/breast-cancer/out.* results/breast-cancer/results.*

cat results/breast-cancer/all-results-1symbolic