用R code做鉴定比较 wald test ，score test，lrt