polySegratioMM (version 0.6-5)

print.dosagesMCMC: Doses from Bayesian mixture model

Description

Prints objects of S3 class dosagesMCMC or segratioMCMC

Usage

# S3 method for dosagesMCMC
print(x, ..., index.sample = 20)
# S3 method for segratioMCMC
print(x, ..., row.index = c(1:10), var.index = c(1:6), marker.index
 = c(1:8), chain = 1)

Value

None.

Arguments

x

object of class dosagesMCMC or segratioMCMC

...

extra options for printing

index.sample

which markers to print (Default: 20 markers at random)

row.index

which rows to print (Default: first 10)

var.index

which mixture model variable to summarise (Default: all)

marker.index

which markers to summarise (Default: 1:8)

chain

which chain to print (Default: 1)

Author

Peter Baker

See Also

dosagesMCMC readJags

Examples

## simulate small autooctaploid data set
a1 <- sim.autoMarkers(8,c(0.7,0.2,0.1),n.markers=100,n.individuals=50)
##print(a1)
sr <-  segregationRatios(a1$markers)
x <- setModel(3,8)

## fit simple model in one hit

if (FALSE) {
x.run <- runSegratioMM(sr, x, burn.in=200, sample=500)

print(x.run$doses)
}