coerce-vector function

Coerce numeric vector to sparse double