descript {seqtest}

Print descriptive statistics

Description

This function prints descriptive statistics for the seqtest object

Usage

descript(x, digits = 2, output = TRUE)

Arguments

x

seqtest object.

digits

integer indicating the number of decimal places to be displayed.

output

logical: if TRUE, output is shown.

Author(s)

Takuya Yanagida [e-mail]

References

Rasch, D., Pilz, J., Verdooren, L. R., & Gebhardt, G. (2011). Optimal experimental design with R. Boca Raton: Chapman & Hall/CRC.

Rasch, D., Kubinger, K. D., & Yanagida, T. (2011). Statistics in psychology - Using R and SPSS. New York: John Wiley & Sons.

Schneider, B., Rasch, D., Kubinger, K. D., & Yanagida, T. (2015). A Sequential triangular test of a correlation coefficient's null-hypothesis: 0 < \rho \le \rho0. Statistical Papers, 56, 689-699.

See Also

seqtest.mean, seqtest.prop, seqtest.cor, plot.seqtest, descript

Examples

#--------------------------------------
# Sequential triangular test for the arithmetic mean in one sample

seq.obj <- seqtest.mean(56, mu = 50, theta = 0.5,
                        alpha = 0.05, beta = 0.2)

seq.obj <- update(seq.obj, x = c(54, 52, 46, 49))

descript(seq.obj)

#--------------------------------------
# Sequential triangular test for the proportion in one sample

seq.obj <- seqtest.prop(c(1, 1, 0, 1), pi = 0.5, delta = 0.2,
                        alpha = 0.05, beta = 0.2)

seq.obj <- update(seq.obj, x = c(1, 1, 1, 1, 1, 0, 1, 1, 1))

descript(seq.obj)

#--------------------------------------
# Sequential triangular test for Pearson's correlation coefficient

seq.obj <- seqtest.cor(0.46, k = 14, rho = 0.3, delta = 0.2,
                       alpha = 0.05, beta = 0.2, plot = TRUE)

seq.obj <- update(seq.obj, c(0.56, 0.76, 0.56, 0.52))

descript(seq.obj)