##---- Should be DIRECTLY executable !! ----##-- ==> Define data, use random,##-- or do help(data=index) for the standard data sets.## The function is currently defined asfunction (MAF,weights.beta){return(diag(dbeta(MAF,weights.beta[1],weights.beta[2])^2))}