Formula Of Chi Square Test In R