polySegratio (version 0.2-5)

print.simAutoMarkers: Print objects of class simAutoMarkers

Description

Prints an object of S3 class simAutoMarkers

Usage

# S3 method for simAutoMarkers
print(x, …, row.index = c(1:min(10,
nrow(x$markers))), col.index = c(1:min(10, ncol(x$markers))) )
# S3 method for simAutoCross
print(x, …, row.index = c(1:min(10,
nrow(x$markers))), col.index = c(1:min(10, ncol(x$markers))))
# S3 method for divideAutoMarkers
print(x, …, row.index = c(1:10),
  col.index = c(1:10), tabulate.extras = FALSE )

Arguments

x

object of class simAutoMarkers

row.index

which rows to print (Default: first 10)

col.index

which columns to print (Default: first 10)

tabulate.extras

If TRUE then cross--tabulate any axtra columns (Default: FALSE)

…

extra options for printing

Value

None.

See Also

segRatio, segregationRatios, sim.autoCross, sim.autoMarkers, divide.autoMarkers, print

Examples

# NOT RUN {
## generate data sets
a1 <- sim.autoMarkers(4,c(0.8,0.2))
a2 <- sim.autoMarkers(8,c(0.7,0.2,0.09,0.01),type="homo",n.markers=20,n.individuals=10)

print(a1)
print(a2)

## datasets from crosses
p1 <- sim.autoCross(4, dose.proportion=c(0.7,0.3), n.markers=20, n.indiv=10)
print(p1)
p2 <- sim.autoCross(4, dose.proportion=list(p01=c(0.7,0.3),p10=c(0.7,0.3),p11=c(0.6,0.2,0.2)))
print(p2)

## divide up data from crosses
ss <- divide.autoMarkers(p2$markers)
print(ss)



# }