Jake,

The interaction2wt function in the HH package does something similar.
Please look at its examples and see if it satisfies your current need.
Look especially at the examples with simple=TRUE.

install.packages("HH")  ## if you don't already have it
library(HH)
example(interaction2wt)

On Wed, Oct 6, 2010 at 10:21 AM, Jake Kami <jakejkami@gmail.com> wrote:

	[[alternative HTML version deleted]]

