pub fn into_col<S>(a: ArrayBase<S, Ix1>) -> ArrayBase<S, Ix2> where
    S: Data