[R] fac.design in R

hi, Anyone here know well of the fac.design of S-plus? I need to rewrite the following code in R code in S-plus *pt.design = fac.design( c(2,2,3,2),factor.names = list(Hs=c("I","II"),lef = c("0","1"),lep = c("0","1","2"),Type=c("gt","sy"))) c.design=fac.design( levels=c(2,2,2,2),factor=list(A=loh

[R] how to write fac.design (S-plus) in R

hi, Anyone here know well of the fac.design of S-plus? I need to rewrite the following code in R code in S-plus *pt.design = fac.design( c(2,2,3,2),factor.names = list(Hs=c("I","II"),lef = c("0","1"),lep = c("0","1","2"),Type=c("gt","sy"))) c.design=fac.design( levels=c(2,2,2,2),factor=list(A=loh