# \donttest{
data(Results_full_rg)
data(Results_full_rg_array)
Results_full_rg<-Results_full_rg[1:15,1:15]
Results_full_rg_array<-Results_full_rg_array[1:15,1:15,]
plei_h2_idx<-1
ratio_a <- 0.75
generate_proposal_sample_changea_cor(Results_full_rg,
Results_full_rg_array, plei_h2_idx, ratio_a)
# }
Run the code above in your browser using DataLab