How to generate shuffled negative control concatemers?

Hello @imielinski @asd1289 @mskilab 

Happy to read your excellent work!

When I was running RE chromunity example, I found there is no R code for Negative-control concatemers generation function.
Could you please give some code example for Negative-control concatemers generation?