cor_matrix: Error in t.default(.) : argument is not a matrix

[Deleetdk]

Somehow the complex weights gets triggered without it being the case. Does not always happen, e.g. testing calls work fine:

cor_matrix(iris, weights = "Petal.Width") #weights from name
cor_matrix(iris, weights = 1:150) #weights from vector

Error + stack.

Error in t.default(.) : argument is not a matrix
> traceback()
13: t.default(.)
12: t(.)
11: function_list[[k]](value)
10: withVisible(function_list[[k]](value))
9: freduce(value, `_function_list`)
8: `_fseq`(`_lhs`)
7: eval(expr, envir, enclos)
6: eval(quote(`_fseq`(`_lhs`)), env, env)
5: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
4: (weights[c(row, col)]) %>% t
3: nrow(x)
2: psych::harmonic.mean((weights[c(row, col)]) %>% t)
1: cor_matrix(americas_divisions[c("ACHaverage", "S_rescaled")], 
       CI = 0.95, weights = "sqrt_pop")