Pearson's chi square goodness of fit test - using R

Pearson's chi square goodness of fit test (some pooling)

Gives something like this:

Chi-squared test for given probabilities
data: x
X-squared = 293.3333, df = 4, p-value < 2.2e-16
Warning message:
Chi-squared approximation may be incorrect in: chisq.test(x, p = y/sum(x))