将biserial函数应用于数据框的所有列

Question

在R中，我有一个包含100列的数据框。我想应用biserial（x，y），我需要迭代x的列。 例如：

biserial(x=train5$GENDER,y=train5$RESPONDERS)
biserial(x=train5$LEGAL_ENTITY,y=train5$RESPONDERS)
biserial(x=train5$AGE,y=train5$RESPONDERS)

这就是我对前三列所做的，我需要以迭代的方式用数据帧的列名替换x的值，我需要计算它们的biserial值。