Было бы хорошо, если бы вы могли предоставить образец ваших данных, но я предполагаю, что ключевая проблема заключается в том, что числовые данные в Inclusivity
сохраняются как фактор. например.,
library(tidyverse)
x <- tibble(incl = as.factor(c(0.631, 0.681, 0.716)),
soc_vote=1:3)
lm(soc_vote ~ incl, x)
Call:
lm(formula = soc_vote ~ incl, data = x)
Coefficients:
(Intercept) incl0.681 incl0.716
1 1 2
Принимая во внимание, что если вы сначала преобразуете столбец Inclusivity
в double, вы получите
y <- x %>% mutate(incl = as.double(as.character(incl)))
lm(soc_vote ~ incl, y)
Call:
lm(formula = soc_vote ~ incl, data = y)
Coefficients:
(Intercept) incl
-13.74 23.29
Обратите внимание, что сначала мне нужно было преобразовать в символ, поскольку в противном случае я просто получаю порядковый эквивалент каждого фактора.