Updated some loops in Test2state.R.  Most of the 2 stage automation works.  Now need to change to 3 states.