permute non-zero elements of vectors

Permutes the non-zero elements of a numeric vector.

permute_nonzero(v)

Arguments

v

A numeric vector.

Value

A numeric vector with non-zero elements permuted.

Examples

v <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) # put in some zeroes
v = c(v, 0, 0, 0)
permute_nonzero(v)
#>  [1]  9  1  8  6 10  7  2  3  5  4  0  0  0