Merge pull request #69 from Cristianetaniguti/main

New functions updates

MAPpoly.Rproj

@@ -1,20 +1,20 @@
-Version: 1.0
-
-RestoreWorkspace: Default
-SaveWorkspace: Default
-AlwaysSaveHistory: Default
-
-EnableCodeIndexing: Yes
-UseSpacesForTab: Yes
-NumSpacesForTab: 2
-Encoding: UTF-8
-
-RnwWeave: knitr
-LaTeX: pdfLaTeX
-
-BuildType: Package
-PackageUseDevtools: Yes
-PackageInstallArgs: --no-multiarch --with-keep.source --resave-data
-PackageBuildArgs: --resave-data
-PackageCheckArgs: --no-vignettes --as-cran --install-args=--build
-PackageRoxygenize: rd,collate,namespace,vignette
+Version: 1.0
+
+RestoreWorkspace: Default
+SaveWorkspace: Default
+AlwaysSaveHistory: Default
+
+EnableCodeIndexing: Yes
+UseSpacesForTab: Yes
+NumSpacesForTab: 2
+Encoding: UTF-8
+
+RnwWeave: knitr
+LaTeX: pdfLaTeX
+
+BuildType: Package
+PackageUseDevtools: Yes
+PackageInstallArgs: --no-multiarch --with-keep.source --resave-data
+PackageBuildArgs: --resave-data
+PackageCheckArgs: --no-vignettes --as-cran --install-args=--build
+PackageRoxygenize: rd,collate,namespace,vignette

R/RcppExports.R

@@ -1,23 +1,23 @@
-# Generated by using Rcpp::compileAttributes() -> do not edit by hand
-# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
-
-#' @export
-.vcf_get_probabilities <- function(mat, pl_pos) {
-    .Call('_mappoly_vcf_get_probabilities', PACKAGE = 'mappoly', mat, pl_pos)
-}
-
-#' @export
-.vcf_transform_dosage <- function(mat, gt_pos) {
-    .Call('_mappoly_vcf_transform_dosage', PACKAGE = 'mappoly', mat, gt_pos)
-}
-
-#' @export
-.vcf_get_ploidy <- function(mat, gt_pos) {
-    .Call('_mappoly_vcf_get_ploidy', PACKAGE = 'mappoly', mat, gt_pos)
-}
-
-#' @export
-.vcf_get_depth <- function(mat, dp_pos) {
-    .Call('_mappoly_vcf_get_depth', PACKAGE = 'mappoly', mat, dp_pos)
-}
-
+# Generated by using Rcpp::compileAttributes() -> do not edit by hand
+# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
+
+#' @export
+.vcf_get_probabilities <- function(mat, pl_pos) {
+    .Call('_mappoly_vcf_get_probabilities', PACKAGE = 'mappoly', mat, pl_pos)
+}
+
+#' @export
+.vcf_transform_dosage <- function(mat, gt_pos) {
+    .Call('_mappoly_vcf_transform_dosage', PACKAGE = 'mappoly', mat, gt_pos)
+}
+
+#' @export
+.vcf_get_ploidy <- function(mat, gt_pos) {
+    .Call('_mappoly_vcf_get_ploidy', PACKAGE = 'mappoly', mat, gt_pos)
+}
+
+#' @export
+.vcf_get_depth <- function(mat, dp_pos) {
+    .Call('_mappoly_vcf_get_depth', PACKAGE = 'mappoly', mat, dp_pos)
+}
+