A/B 테스트 실습

dat <- read.csv('abtest.csv', header = T) table(dat) chisq.test(dat$ad_type, dat$buyornot, simulate.p.value = T)