Constructor that accepts `refs` and `pool`

Sometimes I'm starting with an existing array of Ints (`refs`), and a `pool` vector.

Is there a friendly way to make a PooledArray out of that? I couldn't find one - seems you have to go via the basic constructor with `invpool = Dict(k => i for (k, i) in pool)`, then this gets turned back to `pool` in the constructor! A `PooledArray(refs, pool)` constructor would be useful.