#***********************************#
#*                                  *#
#*                Normal table      *#
#*                                  *#
#*  By : Ahmad Vakili               *#
#*  @R_Experts                      *#
#***********************************#
Normal_Table <- function(b){
  x <- round(seq(0,b,0.1),1)
  y <- seq(0,0.09,0.01)
  nr<-length(x)
  nc<-length(y)
  m  <- matrix(0,nr,nc)
  for (i in 1:nr){
    for(j in 1:nc){
      m[i,j] <- round(pnorm(x[i]+y[j]),5)
    }
  }
  colnames(m) <- y
  rownames(m) <- x
  m
}

Normal_Table(0)
View(Normal_Table(2))

® کانال آموزش زبان R

🔰شماره آموزش : 12

🔰موضوع : جدول توزیع نرمال

#درخواستی_اعضای_کانال

#Normal_table

🆔 @R_Experts