在自定义级别分为两个变量的卡方中

Question

我有4个二分变量，我想针对12个数字变量进行测试。调整项：我只想测试结果变量取小于或大于固定值的几率，两者的取值会有所不同。

我一直在一步一步地做，然后在xls中复制-pasting，这显然不是非常有效或可靠。例如：

chisq.test(table(AT$Q11_9, AT$B8<3))
     # AT: my data frame
     # Q11_9, dichotomous var., "Footpaths constitute a barrier", 0 / 1
     # B8: attitude to walking, and I am interested only in low values

lapply seems to be a way to loop across variables，我仍然需要弄清楚它，但这可能正是我想要的。

有没有办法：

• 仅测试数据框中的一组变量（包含1,870个变量！）

• 仅针对特定值进行测试，在这种情况下：

  Q11_4，Q11_9，Q11_20，Q11_21，Q11_22，Q11_23，
    B14_1 <4，B14_2 <4，B14_3 <4，B15_1 <4，B15_2 <4，B15_3 <4，   B8 <3，Q18_1 <4，
    Q2_1_S> 5，Q2_7_S <6，Q2_S_S <11