## import data
# data(MetaGenotypeCount)
## delete first line
# temp=MetaGenotypeCount[-1,];
# result=meta.MCPerm(case_11=as.numeric(temp[,14]),case_12=as.numeric(temp[,16]),
# case_22=as.numeric(temp[,18]),control_11=as.numeric(temp[,15]),
# control_12=as.numeric(temp[,17]),control_22=as.numeric(temp[,19]),
# model="allele",fixed_method="MH",random_method="DL",repeatNum=1000)
# PermMeta.LnOR.Hist(result,plot="LnOR",plot_study="all",nrow=2,ncol=2,
# title=NULL,xlab="LnOR")
# PermMeta.LnOR.Hist(result,plot="LnOR_VAR",plot_study=c(3,5,12,21),nrow=2,ncol=2,
# main="Background distribution for LnOR_VAR",title=NULL,xlab="LnOR_VAR")
Run the code above in your browser using DataLab