Nothing
## generating function
asAnscombe <- function(eff = .95, biastype = symmetricBias(),
normtype = NormType()){
new("asAnscombe", eff = eff, biastype = biastype,
normtype = normtype) }
## access method
setMethod("eff", "asAnscombe", function(object) object@eff)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.