я есть набор данных, которые исследуют депрессию среди людей с разными этническими группами (черный, белый и латина).

Я хочу знать, как депрессия на исходном уровне связана с депрессией на посту со всеми этническими группами, я сделал

lm(depression_base ~ depression_post, data=Data

Теперь я хочу посмотреть на отношения по этническому признаку. Этнос в моем наборе данных закодирован как0 = White, 1 = Black, а также2 = Latina, Я думаю, что мне нужно использоватьifelse функции, но я не могу заставить его работать. Вот то, что я пыталсяWhite:

lm(depression_base[ifelse, ethnicity == 0],
   depression_post[ifelse, ethnicity == 0])

Какие-либо предложения?