constituerGrappes: Quadtree variant function (Variante de la fonction Quadtree)

Description Usage Arguments Value Author(s) Examples

View source: R/RcppExports.R

Description

Quadtree variant function.

(Variante de la fonction Quadtree.)

Usage

1
constituerGrappes(iNbObsMin, mEffectifs)

Arguments

iNbObsMin

An integer representing the minimum number of elements in each cluster

(Un data.frame représentant le nombre minimum d'éléments dans chaque grappe.)

mEffectifs

staffing matrix for each cell (matrix).

(matrice des effectifs pour chaque case (matrix). .)

Value

Returns a matrix with the cluster number for each cell .

(Retourne une matrix avec le numéro de grappe pour chaque cellule.)

Author(s)

Psar Analyse Urbaine Insee - Arlindo Dos Santos and Francois Semecurbe

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
dfObservations <- data.frame(x = c(15, 35, 15, 25, 35, 55, 45, 45, 55, 65, 70, 75, 85, 90,
                                    65, 75, 85, 65, 70, 75, 85, 90, 65, 70, 75)
                          ,  y = c(10, 10, 30, 30, 35, 35, 45, 55, 55, 65, 65, 65, 65, 65,
                                    70, 70, 70, 75, 75, 75, 75, 75, 85, 85, 85)
)

cellSize <- 20L

# calcul de l'indice des observations 
# on prend le rectangle englobant 
# et on positionne le debut de la numérotation sur la première observation
dfObservations$col <- as.integer(floor((dfObservations$x) / cellSize)
                               - floor(min(dfObservations$x / cellSize)) + 1)
dfObservations$row <- as.integer(floor((dfObservations$y) / cellSize) 
                               - floor(min(dfObservations$y / cellSize)) + 1)

mEffectifs <- constituerMatriceEffectifs(dfObservations$row - 1, dfObservations$col - 1)

#### matrice des grappes
mGrappes <- constituerGrappes(1, mEffectifs)

btb documentation built on May 23, 2018, 5:04 p.m.