Compacting a vector of any length with or without names
compact_vec(data, nm.sep = ": ", val.sep = "; ")
data
: vector, optionally namednm.sep
: string separating name from value if anyval.sep
: string separating valuescharacter string
sample(seq_len(4), 20, TRUE) |> as_factor() |> named_levels() |> sort() |> compact_vec() 1:6 |> compact_vec() "test" |> compact_vec() sample(letters[1:9], 20, TRUE) |> compact_vec()
Useful links