ktab.data.frame(df, blocks, rownames = NULL, colnames = NULL,
tabnames = NULL, w.row = rep(1, nrow(df)) / nrow(df),
w.col = rep(1, ncol(df)))
ktab
. See ktab
.data(escopage)
wescopage <- data.frame(scalewt(escopage$tab))
wescopage <- ktab.data.frame(wescopage, escopage$blo,
tabnames = escopage$tab.names)
plot(sepan(wescopage))
data(friday87)
w <- data.frame(scale(friday87$fau, scal = FALSE))
w <- ktab.data.frame(w, friday87$fau.blo, tabnames = friday87$tab.names)
kplot(sepan(w))
Run the code above in your browser using DataLab