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

Fix some package issues

Browse source
This commit is contained in:
Elias Projahn 2021-11-23 09:42:21 +01:00
parent 599f09a52f
commit f2bc4318a2
3 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
R/neural.R
View file

@ -133,7 +133,10 @@ neural <- function(preset, progress = NULL, seed = 49641) {
colnames(data_matrix) <- NULL
data_matrix <- keras::normalize(data_matrix)
data[gene %chin% gene_ids, score := predict(model, data_matrix)]
data[
gene %chin% gene_ids,
score := stats::predict(model, data_matrix)
]
if (!is.null(progress)) {
progress_buffer <<- progress_buffer + progress_step