data(FH_data)
x1=FH_data$SurvivalTime
x2=FH_data$HospitalNo
Cat_LR(x1,x2)
readline(prompt = "Pause. Press to continue...")
Cat_LR(x1,x2,alfa=0.10)
readline(prompt = "Pause. Press to continue...")
Cat_LR(x1,x2,alfa=0.10,table=FALSE)
readline(prompt = "Pause. Press to continue...")
Cat_LR(x1,x2,alfa=0.10,table=FALSE,graph="raw")
readline(prompt = "Pause. Press to continue...")
Cat_LR(x1,x2,alfa=0.10,m=5000,table=FALSE,graph="none")
# ---THIS VERSION IS ESPECIALLY USEFUL FOR COMPARISON STUDIES BY SIMULATION---
# #first value of the vector is r value(r=1 when rejected and r=0 when accepted null hypothesis)
# second value of the vector is the p-value and third value is the tests statistic value
Run the code above in your browser using DataLab