print.dosagesMCMC {polySegratioMM}

Doses from Bayesian mixture model

Description

Prints objects of S3 class dosagesMCMC or segratioMCMC

Usage

## S3 method for class 'dosagesMCMC'
print(x, ..., index.sample = 20)

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

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)

Value

None.

Author(s)

Peter Baker [e-mail]

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

## Not run: 
x.run <- runSegratioMM(sr, x, burn.in=200, sample=500)

print(x.run$doses)

## End(Not run)