Как можно присвоить значения столбцу матрицы?

Question

Я хочу присвоить числа, сгенерированные равномерным распределением, столбцам матрицы с помощью следующей команды, но, к сожалению, она не работает. Кто-то может мне помочь.

p<- matrix(NA, ncol=5, nrow=50)
for(i in 1:nrow(p)){
  a<-runif(5,0,1)
  if(a<=0.25){p[,2]<-a<0.25}
  else if(a<=0.66){p[,3]<-a<0.66}
  else if(a<=0.88){p[,4]<-a<0.88}
  else{p[,5]}
  return(p) 
  }