why infinity occurs in my Gibbs sampler code?

Question

I am working on Gibbs sampler for my z which is Normal distribution and my code is as follows:

 x <- matrix(1:3000,nrow=300,ncol=10)
 y<-ma