Warning in affected_reg()

[pcarbo]

@william-denault When I ran the "affected_reg" function on this example, I got the following warning message:

library(fsusieR)
fit <- readRDS("affected_reg_example.rds")
affected_reg(fit)
# Warning message:
# In (function (..., deparse.level = 1)  :
#   number of columns of result is not a multiple of vector length (arg 2)

This was using fsusieR 0.2.77.

Are you able to reproduce the warning? I'm wondering if this indicates a bug in your code.