barysort: row and column moment reordering

Description Usage Arguments Value Examples

View source: R/barysort.R

Description

An iterative row and column reordering procedure based on the barycenter heuristic.

Usage

1
barysort(x, vs = 1)

Arguments

x

The data matrix.

vs

version. no effect.

Value

The reordered matrix.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
# a good and quick solution:
a <- arsim(2000,c(24,24),6, noise=0.4)
fluctile(a2<-barysort(a))
BCI(a2)

# which is near
a3 <- optile(a, iter=100)
BCI(a3)


## Not run: 
a <- arsim(64000,c(256,256),16, noise=0.4)
s1 <- system.time( bci1 <- BCI(a1<-optile(a, fun = "barysort", 
foreign=".Call", iter = 1)) )[[3]]

s2 <- system.time( bci2 <- BCI(a2<-optile(a, iter=1)) )[[3]]
s3 <- system.time( bci3 <- BCI(a3<-optile(a, fun="IBCC",iter=1)) )[[3]]

## End(Not run)

extracat documentation built on July 17, 2018, 5:05 p.m.

Related to barysort in extracat...