johrpan/geposanui
1
0
Fork 0
mirror of https://github.com/johrpan/geposanui.git synced 2025-10-26 11:17:24 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Properly set replicative species

Browse source
This commit is contained in:
Elias Projahn 2021-10-21 17:34:53 +02:00
parent 4cf5bff125
commit 667eb8f2a3
2 changed files with 6 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

5
R/data.R
View file

@ -94,6 +94,9 @@ methods <- list(
# Gene IDs of known or suggested TPE-OLD genes.
genes_tpe_old <- genes[suggested | verified == TRUE, id]
# Species IDs for replicatively aging species.
species_replicative <- species[replicative == TRUE, id]
# Preset for [geposan] including all species and TPE-OLD genes for reference.
preset_all_species <- geposan::preset(
methods = c("clusteriness", "correlation", "proximity", "neural"),
@ -106,7 +109,7 @@ preset_all_species <- geposan::preset(
# TPE-OLD genes for reference.
preset_replicative_species <- geposan::preset(
methods = c("clusteriness", "correlation", "proximity", "neural"),
species = species_ids_replicative,
species = species_replicative,
genes = genes$id,
reference_genes = genes_tpe_old
)