If you want to generate data in R to testing proposals you can do

x<-sample(1:6,25,replace=T)

Generates 25 random numbers between 1 and 6