Print details and timing of JAGS run and summaries of results
## 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
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.
## simulate small autooctaploid data seta1 <- 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)## Not run:## fit simple model in one hitx.run <- runSegratioMM(sr, x, burn.in=200, sample=500)print(x.run)## End(Not run)