polySegratioMM (version 0.6-2)

print.runJags: Running JAGS

Description

Print details and timing of JAGS run and summaries of results

Usage

## S3 method for class 'runJags':
print(x, ...)
## S3 method for class 'runJagsWrapper':
print(x, ...)

Arguments

x

Objects of class runJags or runJagsWrapper

...

extra printing options

Value

• None.

concept

• segregation ratio
• dominant marker
• autopolyploid

Details

print.runJags can be employed when runJags is called directly and reports timimgs and dates while print.runJagsWrapper provides summary statistics when runSegratioMM is used.

See Also

runJags runSegratioMM

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

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