[R] melt with complications

[Charles Berry]

Richard M. Heiberger <rmh <at> temple.edu> writes:

> 
> ## Can someone suggest a simpler expression than either of these, with the
> goal
> ## of taking a long matrix into a wide one with exactly one of the factors
> converted to
> ## columns and all the rest retained as factors.  I want something that
> generalizes beyond
> ## the three factors illustrated here.
> 
> ## Rich
> 
> meltTest <- data.frame(A=rep(c("B","C"), each=12),
>                        D=rep(c("E","F","G"), each=4, times=2),
>                        H=rep(c("I","J","K","L"), times=6),
>                        M=1:24)
>

amat <- ftable( xtabs( M ~ A + D + H, meltTest ),row.vars=1:2 )

amat is such a matrix with a few attributes added.

HTH,

Chuck