Repeatedly shuffling a deck of cards in R

I have a problem with writing a code labyrinth, which will repeatedly shuffle the deck of cards. I have a line written that shuffles my waist, but each time the deck is shuffled in the same way. I need help writing the code so that each time the cards are shuffled in a different way.

shuffling <-sample(deck,length(deck))