Functions_for_Permutation: Helper Functions for Permutation
In GlobalDeviance: Global Deviance Permutation Tests

Description Usage Arguments Details Value Author(s) Examples

The functions adapted from packages globaltest and GlobalAncova.

.mchoose(counts)

.nPermsG(counts, grouping)

.nPerms(D.full, model.dat, formula.full)

.allpermsG(counts, grouping)

.allperms(nums)

`counts`	Counts.
`grouping`	Indices for the group.
`D.full`	Designmatrix from the full model.
`model.dat`	Dataset with covariables.
`formula.full`	Formula from the full model.
`nums`	Indices to be permuted.

The function .mchoose calculates the number of permutations.

The function .nPermsG calculates the number of permutations for multiple groups.

The function .nPerms calculates the number of permutations from the designmatrix.

The function .allpermsG lists all permutations for the multiple-group case.

The function .allperms lists all permutations for the continuos case.

`.mchoose`	A number.
`.nPermsG`	A number.
`.nPerms`	Number of permutations (`nPerms`) and a vector which counts same rows of the designmatrix (`counts`).
`.allpermsG`	A matrix.
`.allperms`	A matrix (`nums` x `nums`!).

Frederike Fuhlbrueck [email protected]

## Not run: 
### Examples
# Number of permutations
.mchoose(1:3)               # or choose(sum(1:3), 1) * choose(sum(2:3), 2)

# Number of permutations for multiple groups
.nPermsG(1:3, c(1, 1, 2))

# Number of permutations from the designmatrix
D.full<-t(matrix(c(1:9, 1:3), 3, 4))
model.dat<-matrix(c(1,0,0,1,0,1,0,0), 4, 2)
colnames(model.dat)<-c("A", "B")
formula.full<-~A+B
.nPerms(D.full, model.dat, formula.full)

# All permutations for the multiple-group case
.allpermsG(c(2, 1, 2), c(1, 1, 2)) 

# All permutations for the continuos case
.allperms(1:3)

## End(Not run)