# Detecting all neighbors within range

Aaron Lun1

1Cancer Research UK Cambridge Institute, Cambridge, United Kingdom

#### Revised: 28 September 2018

#### Package

BiocNeighbors 1.0.0

# 1 Identifying all neighbors within range

Another application of the KMKNN algorithm is to identify all neighboring points within a certain (Euclidean) distance of the current point. We first mock up some data:

    nobs <- 10000
    ndim <- 20
    data <- matrix(runif(nobs*ndim), ncol=ndim)

We apply the `findNeighbors()` function to `data`:

    fout <- findNeighbors(data, threshold=1)
    head(fout$index)

    ## [[1]]
    ## [1] 9726 2342 4648 9217 6125 3692    1
    ##
    ## [[2]]
    ## [1]  830    2 7114 6012
    ##
    ## [[3]]
    ## [1] 8075 1552    3
    ##
    ## [[4]]
    ## [1] 1301 1567    4 3663
    ##
    ## [[5]]
    ## [1] 2787 6634 8075    5 8445 2575
    ##
    ## [[6]]
    ## [1] 6

    head(fout$distance)

    ## [[1]]
    ## [1] 0.9695414 0.9725275 0.8295535 0.9523862 0.9833317 0.9302017 0.0000000
    ##
    ## [[2]]
    ## [1] 0.9593136 0.0000000 0.8707775 0.9996069
    ##
    ## [[3]]
    ## [1] 0.9955845 0.8394798 0.0000000
    ##
    ## [[4]]
    ## [1] 0.9219160 0.9831219 0.0000000 0.9820215
    ##
    ## [[5]]
    ## [1] 0.9416018 0.9410208 0.9872069 0.0000000 0.9348847 0.6658189
    ##
    ## [[6]]
    ## [1] 0

Each entry of the `index` list corresponds to a point in `data` and contains the row indices in `data` that are within `threshold`. For example, the 3rd point in `data` has the following neighbors:

    fout$index[[3]]

    ## [1] 8075 1552    3

… with the following distances to those neighbors:

    fout$distance[[3]]

    ## [1] 0.9955845 0.8394798 0.0000000

Note that, for this function, the reported neighbors are not sorted by distance. The order of the output is completely arbitrary and will vary depending on the random seed. However, the identity of the neighbors is fully deterministic.

# 2 Querying another data set for neighbors

The `queryNeighbors()` function is also provided for identifying all points within a certain distance of a query point. Given a query data set:

    nquery <- 1000
    ndim <- 20
    query <- matrix(runif(nquery*ndim), ncol=ndim)

… we apply the `queryNeighbors()` function:

    qout <- queryNeighbors(data, query, threshold=1)
    length(qout$index)

    ## [1] 1000

… where each entry of `qout$index` corresponds to a row of `query` and contains its neighbors in `data`. Again, the order of the output is arbitrary but the identity of the neighbors is deterministic.

# 3 Further options

Most of the options described for `findKNN()` are also applicable here. For example:

- `subset` to identify neighbors for a subset of points.
- `get.distance` to avoid retrieving distances when unnecessary.
- `BPPARAM` to parallelize the calculations across multiple workers.
- `raw.index` to return the raw indices from a precomputed index.

Note that the argument for a precomputed index is `precomputed`:

    pre <- buildNNIndex(data, BNPARAM=KmknnParam())
    fout.pre <- findNeighbors(precomputed=pre, threshold=1)
    qout.pre <- queryNeighbors(precomputed=pre, query=query, threshold=1)

Users are referred to the documentation of each function for specific details.

# 4 Session information

    sessionInfo()

    ## R version 3.5.1 Patched (2018-07-12 r74967)
    ## Platform: x86_64-pc-linux-gnu (64-bit)
    ## Running under: Ubuntu 16.04.5 LTS
    ##
    ## Matrix products: default
    ## BLAS: /home/biocbuild/bbs-3.8-bioc/R/lib/libRblas.so
    ## LAPACK: /home/biocbuild/bbs-3.8-bioc/R/lib/libRlapack.so
    ##
    ## locale:
    ##  [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C
    ##  [3] LC_TIME=en_US.UTF-8        LC_COLLATE=C
    ##  [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8
    ##  [7] LC_PAPER=en_US.UTF-8       LC_NAME=C
    ##  [9] LC_ADDRESS=C               LC_TELEPHONE=C
    ## [11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
    ##
    ## attached base packages:
    ## [1] stats     graphics  grDevices utils     datasets  methods   base
    ##
    ## other attached packages:
    ## [1] BiocNeighbors_1.0.0 BiocParallel_1.16.0 knitr_1.20
    ## [4] BiocStyle_2.10.0
    ##
    ## loaded via a namespace (and not attached):
    ##  [1] Rcpp_0.12.19        bookdown_0.7        digest_0.6.18
    ##  [4] rprojroot_1.3-2     backports_1.1.2     stats4_3.5.1
    ##  [7] magrittr_1.5        evaluate_0.12       stringi_1.2.4
    ## [10] S4Vectors_0.20.0    rmarkdown_1.10      tools_3.5.1
    ## [13] stringr_1.3.1       parallel_3.5.1      xfun_0.4
    ## [16] yaml_2.2.0          compiler_3.5.1      BiocGenerics_0.28.0
    ## [19] BiocManager_1.30.3  htmltools_0.3.6