exposure <- names(dataset2)[16:42]

we run the model and save the results in the variable "results"

fit1 <- gwqs(Y ~ wqs+z1+z2+z3+z4+z5, mix_name = exposure, data = dataset2, q = 4, validation = 0.6, b = 1000, b1_pos = TRUE, b1_constr = FALSE, family = "binomial", seed = 2023)
Error in [.data.frame(data, , c(allvars, mix_name, other_vars)) :
选择了未定义的列

引用 皆我百晓生 小程序回复内容作答：
这个错误通常表示在运行gwqs模型时选择了未定义的列。请确保列的名称在dataset2数据框中是正确的。您可以使用以下命令检查列名是否正确：

names(dataset2)

请确保列名的拼写正确，并且没有多余的空格或其他特殊字符。如果列名正确，但仍然出现错误，请检查您的数据是否包含缺失值或空值，这可能是导致错误的原因。您可以使用以下命令检查数据中是否存在缺失值：

sum(is.na(dataset2))

如果数据中存在缺失值，请考虑进行数据清洗或处理缺失值的方法，以确保模型可以正确运行。