labeltodendro (version 1.3)

is.aggvec: checks wheather or not one vector is agglomeration of the another

Description

The function is useful to remove labels which not agglomeration or division of eachotehr.

Usage

is.aggvec(labagg,labdiv)

Arguments

labagg

A vector of integers.

labdiv

Another vector of integers.

Details

The function checks if labagg is agglomeration of labdiv. Exchangeable labels are allowed.

Examples

lab1<- c(1,2,1,2,1,2,1,2,1)
lab2<- c(6,3,6,4,6,5,6,2,6) # exchangeable lables are allowed, 1 have the same role as 6
is.aggvec(lab1,lab2) #should be TRUE
is.aggvec(lab2,lab1) #should be FALSE