chi squared test generated uncounted data for smoking example

make-smoking-uncounted-data.py

#!/usr/bin/env/python

# Generate uncounted data for this example:
#http://www.r-tutor.com/elementary-statistics/goodness-fit/chi-squared-test-independence

# python make-smoking-uncounted-data.py < uncounted-data.csv
#
# R:
#   chisq.test(table(read.csv("uncounted-data.csv")))
data = {
    'Heavy': { 'Frequent': 7, 'None': 1, 'Some': 3},
    'Never': { 'Frequent': 87, 'None': 18, 'Some': 84},
    'Occas': { 'Frequent': 12, 'None': 3, 'Some': 4},
    'Regul': { 'Frequent': 9, 'None': 1, 'Some': 7},
}

print("Smoke,Exercise")
for smoking, exercise in data.items():
    for e, count in exercise.items():
        for i in range(count):
            print('{},{}'.format(smoking, e))