randomTableReplacement {CoCoRaw}R Documentation

Replace the table of counts with a random table with margins unchanged

Description

Replace the table observed counts with random table of counts but with counts as the counts of the sufficient tables for the decomposable model.

Usage

randomTableReplacement(model = "current", data = NULL, 
                       object = .object.of.thing(data = data, ...), ...)

Arguments

model See returnModel.
data See exportCoCo.
object See exportCoCo.
... Additional arguments to generate the CoCo object from the data argument. See propertyModel.

Value

TRUE

Author(s)

Jens Henrik Badsberg

References

Badsberg, J.H.: A guide to CoCo, JSS, 2001 ( http://www.jstatsoft.org/v06/i04/ ) and Badsberg, J.H.: Xlisp+CoCo, Aalborg University, 1996.

See Also

enterDataFrame.

Examples

 
library(CoCo);
data(HairEyeColor);
CoCoObject <- makeCoCo();
enterTable(HairEyeColor, object = CoCoObject);
enterModel(":Hair:Sex,:Eye:Sex", object = CoCoObject);
returnTable("observed", "*", object = CoCoObject);
returnTable("observed", ":Hair:Sex", object = CoCoObject);
returnTable("observed", ":Eye:Sex", object = CoCoObject);

randomTableReplacement(object = CoCoObject);
returnTable("observed", "*", object = CoCoObject);
returnTable("observed", ":Hair:Sex", object = CoCoObject);
returnTable("observed", ":Eye:Sex", object = CoCoObject);

randomTableReplacement(object = CoCoObject);
returnTable("observed", "*", object = CoCoObject);
returnTable("observed", ":Hair:Sex", object = CoCoObject);
returnTable("observed", ":Eye:Sex", object = CoCoObject);

endCoCo(object = CoCoObject);

[Package CoCoRaw version 0.1.6.5 Index]