model.averaging(obj)
## S3 method for class 'RJaCGH':
model.averaging(obj)
## S3 method for class 'RJaCGH.Chrom':
model.averaging(obj)
## S3 method for class 'RJaCGH.genome':
model.averaging(obj)
## S3 method for class 'RJaCGH.array':
model.averaging(obj)
states
method. RJaCGH
,
summary.RJaCGH
, states
,
plot.RJaCGH
, trace.plot
,
gelman.brooks.plot
, collapseChain
jp <- list(sigma.tau.mu=rep(0.5, 5), sigma.tau.sigma.2=rep(0.3, 5), sigma.tau.beta=rep(0.7, 5), tau.split.mu=0.5, tau.split.beta=0.5) fit.genome <- RJaCGH(y=y, Pos=Pos, Chrom=Chrom, model="genome", burnin=1000, TOT=10000, jump.parameters=jp, max.k=5) mo <- model.averaging(fit.genome) print(mo)