From 7c87788cad6dd3b3eb59ee8be61a19358b2ea887 Mon Sep 17 00:00:00 2001
From: Elias Projahn <elias@johrpan.de>
Date: Tue, 23 Nov 2021 11:08:21 +0100
Subject: [PATCH] neural: Use tensorflow seed

---
 DESCRIPTION | 3 ++-
 R/neural.R  | 3 ++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index 2b0f092..cdb3fd2 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -23,7 +23,8 @@ Depends:
 Imports:
     data.table,
     keras,
-    rlang
+    rlang,
+    tensorflow
 Suggests:
     biomaRt,
     plotly,
diff --git a/R/neural.R b/R/neural.R
index f60354c..2a22769 100644
--- a/R/neural.R
+++ b/R/neural.R
@@ -5,7 +5,8 @@ neural <- function(preset, progress = NULL, seed = 49641) {
     reference_gene_ids <- preset$reference_gene_ids
 
     cached("neural", c(species_ids, gene_ids, reference_gene_ids), {
-        set.seed(seed)
+        tensorflow::set_random_seed(seed)
+
         gene_count <- length(gene_ids)
 
         progress_buffer <- 0