R/get_constants.R

In richelbilderbeek/ncbi_results: Creates Results

# Raw

#' Get this constant
#' @export
get_n_variations_raw <- function() 60931
#' Get this constant
#' @export
get_n_unique_variations_raw <- function() 60544
#' Get this constant
#' @export
get_n_unique_gene_ids_raw <- function() 953
#' Get this constant
#' @export
get_n_unique_gene_names_raw <- function() 953
#' Get this constant
#' @export
get_n_unique_protein_names_raw <- function() 5163

# Proteins
#' Get this constant
#' @export
get_n_variations <- function() 37831
#' Get this constant
#' @export
get_n_unique_variations <- function() 37630
#' Get this constant
#' @export
get_n_unique_snp_ids <- function() 9621
#' Get this constant
#' @export
get_n_unique_gene_ids <- function() 911
#' Get this constant
#' @export
get_n_unique_gene_names <- function() 911
#' Get this constant
#' @export
get_n_unique_protein_names <- function() 4780
#' Get this constant
#' @export
get_f_tmh <- function() 0.09978325

# MAPs
#' Get this constant
#' @export
get_n_variations_map <- function() 16623
#' Get this constant
#' @export
get_n_unique_variations_map <- function() 16606
#' Get this constant
#' @export
get_n_unique_snp_ids_map <- function() 4219
#' Get this constant
#' @export
get_n_unique_gene_ids_map <- function() 457
#' Get this constant
#' @export
get_n_unique_gene_names_map <- function() 457
#' Get this constant
#' @export
get_n_unique_protein_names_map <- function() 2227
#' Get this constant
#' @export
get_f_tmh_map <- function() 0.00000


# TMPs
#' Get this constant
#' @export
get_n_variations_tmp <- function() 21208
#' Get this constant
#' @export
get_n_unique_variations_tmp <- function() 21024
#' Get this constant
#' @export
get_n_unique_snp_ids_tmp <- function() 6026
#' Get this constant
#' @export
get_n_unique_gene_ids_tmp <- function() 605
#' Get this constant
#' @export
get_n_unique_gene_names_tmp <- function() 605
#' Get this constant
#' @export
get_n_unique_protein_names_tmp <- function() 2553
#' Get this constant
#' @export
get_f_tmh_tmp <- function() 0.1868249

# Duplicates in MAPs and TMPs
#' Get this constant
#' @export
get_n_duplicate_snp_ids_map_tmp <- function() 624 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_duplicate_gene_names_map_tmp <- function() 151 # nolint indeed a long variable name



# TMPs in TMHs
#' Get this constant
#' @export
get_n_variations_tmp_in_tmh <- function() 3803
#' Get this constant
#' @export
get_n_unique_variations_tmp_in_tmh <- function() 3789 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snp_ids_tmp_in_tmh <- function() 1140 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_ids_tmp_in_tmh <- function() 325 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_names_tmp_in_tmh <- function() 325 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_tmp_in_tmh <- function() 1280 # nolint indeed a long variable name
#' Get this constant
#' @export
get_f_tmh_tmp_in_tmh <- function() 0.2568375

# TMPs in soluble regions
#' Get this constant
#' @export
get_n_variations_tmp_in_sol <- function() 17405
#' Get this constant
#' @export
get_n_unique_variations_tmp_in_sol <- function() 17235 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snp_ids_tmp_in_sol <- function() 4936 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_ids_tmp_in_sol <- function() 590 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_names_tmp_in_sol <- function() 590 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_tmp_in_sol <- function() 2467 # nolint indeed a long variable name
#' Get this constant
#' @export
get_f_tmh_tmp_in_sol <- function() 0.1818121

# Spanners
#' Get this constant
#' @export
get_n_variations_tmp_single <- function() 8186
#' Get this constant
#' @export
get_n_variations_tmp_multi <- function() 13022
#' Get this constant
#' @export
get_n_unique_variations_tmp_single <- function() 8184 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_variations_tmp_multi <- function() 12840 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snps_in_single_spanners <- function() 2545 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snps_in_multi_spanners <- function() 3716 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snps_in_both_spanners <- function() 235 # nolint indeed a long variable name

#' Get this constant
#' @export
get_n_unique_gene_names_in_single_spanners <- function() 284 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_names_in_multi_spanners <- function() 359 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_in_single_spanners <- function() 1047 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_in_multi_spanners <- function() 1506 # nolint indeed a long variable name

#' Get this constant
#' @export
get_f_tmh_in_single_spanners <- function() 0.05645657
#' Get this constant
#' @export
get_f_tmh_in_multi_spanners <- function() 0.2824763

# TMPs in TMH
#' Get this constant
#' @export
get_n_variations_tmp <- function() 21208
#' Get this constant
#' @export
get_n_unique_variations_tmp <- function() 21024
#' Get this constant
#' @export
get_n_unique_snp_ids_tmp <- function() 6026
#' Get this constant
#' @export
get_n_unique_gene_ids_tmp <- function() 605
#' Get this constant
#' @export
get_n_unique_gene_names_tmp <- function() 605
#' Get this constant
#' @export
get_n_unique_protein_names_tmp <- function() 2553
#' Get this constant
#' @export
get_f_tmh_tmp <- function() 0.1868249



###############################################################################
# Single/multi-spanners in TMH/soluble region
###############################################################################
# Single-spanners in TMHs
#' Get this constant
#' @export
get_n_variations_single_in_tmh <- function() 452
#' Get this constant
#' @export
get_n_unique_variations_single_in_tmh <- function() 451 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snp_ids_single_in_tmh <- function() 160 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_ids_single_in_tmh <- function() 96 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_names_single_in_tmh <- function() 96 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_single_in_tmh <- function() 304 # nolint indeed a long variable name
#' Get this constant
#' @export
get_f_tmh_single_in_tmh <- function() 0.1054718

# Single-spanners in soluble regions
#' Get this constant
#' @export
get_n_variations_single_in_sol <- function() 7734
#' Get this constant
#' @export
get_n_unique_variations_single_in_sol <- function() 7733 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snp_ids_single_in_sol <- function() 2393 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_ids_single_in_sol <- function() 282 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_names_single_in_sol <- function() 282 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_single_in_sol <- function() 1032 # nolint indeed a long variable name
#' Get this constant
#' @export
get_f_tmh_single_in_sol <- function() 0.05359196

# Multi-spanners in TMHs
#' Get this constant
#' @export
get_n_variations_multi_in_tmh <- function() 3351
#' Get this constant
#' @export
get_n_unique_variations_multi_in_tmh <- function() 3338 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snp_ids_multi_in_tmh <- function() 994 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_ids_multi_in_tmh <- function() 243 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_names_multi_in_tmh <- function() 243 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_multi_in_tmh <- function() 976 # nolint indeed a long variable name
#' Get this constant
#' @export
get_f_tmh_multi_in_tmh <- function() 0.3533563

# Multi-spanners in soluble regions
#' Get this constant
#' @export
get_n_variations_multi_in_sol <- function() 9671
#' Get this constant
#' @export
get_n_unique_variations_multi_in_sol <- function() 9502 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_snp_ids_multi_in_sol <- function() 2762 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_ids_multi_in_sol <- function() 344 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_gene_names_multi_in_sol <- function() 344 # nolint indeed a long variable name
#' Get this constant
#' @export
get_n_unique_protein_names_multi_in_sol <- function() 1435 # nolint indeed a long variable name
#' Get this constant
#' @export
get_f_tmh_multi_in_sol <- function() 0.2579164