powered by
caesar.shoe
prop.trend.test(caesar.shoe["Yes",],margin.table(caesar.shoe,2))
Run the code above in your browser using DataLab