Hi Christine,
In further calculations shows the p-Value for the PearsonChiSquareTest : 0.0496.
\[ScriptCapitalH] =
PearsonChiSquareTest[data, Automatic, "HypothesisTestData"]
\[ScriptCapitalH]["PValueTable"]
p = PearsonChiSquareTest[data]
Good Luck,.......Jos