generating two columns with randomly put 1,2 or 3 but different values for each row

I am looking to assign 3 readers to a list of entries with ~1500 rows. Each row needs to be surveyed twice but not from the same person. My idea was to create two new columns in the data set with randomly put 1,2or3 for the respective readers. But the numbers need to be different for each column.

Anyone got an easy fix for that in R?