rSWeeP 1.4.0
The “Spaced Words Projection (sWeeP)” is a method for representing biological sequences using relatively, it uses the spacedwords concept by scanning sequences and generating indices to create a higherdimensional vector that is later projected into a smaller randomly oriented orthonormal base. This function is suitable for making high quality comparisons between sequences allowing analyzes that are not possible due to the computational limitation of the traditional techniques. The method is available at sWeeP (PIERRI, 2019). This tool has it’s main speed gain in constanci processing time. The response time grows linear to the number of inputs, while in other methods it grow is exponencial.
The package has two functions: orthBase, that generates an orthonormal matrix of a chosen size, and sWeeP, a function that applies the sWeeP method
The orthBase function can create a quasi-orthonormal matrix in any desired size. Here it is used to create a matrix to project the sWeeP method, so it must have 160.000 rows and the columns of the size wished for projection.
library(rSWeeP)
baseMatrix <- orthBase(160000,10)
The exdna.fas dataset consists in a list of three strings that simulates a DNA sequence used for demonstration purposes only.
path <- system.file(package = "rSWeeP", "extdata", "exdna.fas")
Then the sWeeP method is applied and the returns a matrix that represents the sequences compared by a vectorial method. And then it’s possible to see a graphic representation in a phylogenetic tree
return <- sWeeP(path,baseMatrix)
distancia <- dist(return, method = "euclidean")
tree <- hclust(distancia, method="ward.D")
plot(tree, hang = -1, cex = 1)
## R version 4.1.0 (2021-05-18)
## Platform: x86_64-pc-linux-gnu (64-bit)
## Running under: Ubuntu 20.04.2 LTS
##
## Matrix products: default
## BLAS: /home/biocbuild/bbs-3.13-bioc/R/lib/libRblas.so
## LAPACK: /home/biocbuild/bbs-3.13-bioc/R/lib/libRlapack.so
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=en_GB 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] rSWeeP_1.4.0 BiocStyle_2.20.0
##
## loaded via a namespace (and not attached):
## [1] Rcpp_1.0.6 XVector_0.32.0 knitr_1.33
## [4] magrittr_2.0.1 zlibbioc_1.38.0 IRanges_2.26.0
## [7] BiocGenerics_0.38.0 R6_2.5.0 rlang_0.4.11
## [10] highr_0.9 stringr_1.4.0 GenomeInfoDb_1.28.0
## [13] tools_4.1.0 parallel_4.1.0 xfun_0.23
## [16] jquerylib_0.1.4 htmltools_0.5.1.1 yaml_2.2.1
## [19] digest_0.6.27 crayon_1.4.1 bookdown_0.22
## [22] GenomeInfoDbData_1.2.6 BiocManager_1.30.15 S4Vectors_0.30.0
## [25] bitops_1.0-7 sass_0.4.0 RCurl_1.98-1.3
## [28] evaluate_0.14 rmarkdown_2.8 stringi_1.6.2
## [31] pracma_2.3.3 compiler_4.1.0 bslib_0.2.5.1
## [34] magick_2.7.2 Biostrings_2.60.0 stats4_4.1.0
## [37] jsonlite_1.7.2