Error when using the GS_impute function

[jangrasicOIST]

Hi! I used the functions with the example code and data from the vignette and I get the following error after calling GS_impute with the default parameters used in the example.

Error in h(simpleError(msg, call)) : error in evaluating the argument 'x' in selecting a method for function 'rev': no applicable method for 'extract' applied to an object of class "c('integer', 'numeric')"

Thank you for the help!

[metabohaid]

I have encountered the same error. In my case, the function crashed due to the ambiguous extract function in the Gsimp.R script. Extract() appears in the packages magrittr and tidyr. Obviously, gsimp uses the version from magrittr. To explicitly call the extract function from magrittr, you should change the code in the Gsimp.R function in line 110 from:

miss_col_idx <- order(miss_count, decreasing = T) %>% extract(1:sum(miss_count!=0)) %>% rev()

to:
miss_col_idx <- order(miss_count, decreasing = T) %>% magrittr::extract(1:sum(miss_count!=0)) %>% rev()

In my case, the script then worked normally.