data.frame и изменение класса переменных R

Question

Я пытаюсь получить много коэффициентов регрессии в кадр данных для последующего латексирования. Тем не менее, я сталкиваюсь со следующей проблемой, которую не могу понять после вставки некоторых значений в доверительные интервалы:

> str(q2)
'data.frame':   5 obs. of  7 variables:
 $ name     : Factor w/ 5 levels "1","2",..: 1 2 3 4 5
 $ Intercept: Factor w/ 5 levels "15.4533848220452",..: 1 2 3 4 5
 $ Int.lb   : Factor w/ 5 levels "14.2125590292247",..: 1 2 3 4 5
 $ Int.ub   : Factor w/ 5 levels "17.1483176230248",..: 1 2 3 4 5
 $ BAC      : Factor w/ 5 levels "-0.317030740768092",..: 1 2 3 4 5
 $ Bac.lb   : Factor w/ 5 levels "-0.789518593140102",..: 1 2 3 4 5
 $ Bac.ub   : Factor w/ 5 levels "0.0844578956839408",..: 1 2 3 4 5
> str(q3)
'data.frame':   5 obs. of  2 variables:
 $ CI: Factor w/ 5 levels "(12.17,14.34)",..: 2 1 5 4 3
 $ ci: Factor w/ 5 levels "(-0.31,0.74)",..: 3 5 2 4 1
> q4<-as.data.frame(cbind(name=q2$name,Intercept=q2$Intercept,Interecpt.95.CI=q3$CI,BAC=q2$BAC,BAC.95.CI=q3$ci))
> q4
  name Intercept Interecpt.95.CI BAC BAC.95.CI
1       1         1               2   1         3
2       2         2               1   2         5
3       3         3               5   3         2
4       4         4               4   4         4
5       5         5               3   5         1

> str(q4)
'data.frame':   5 obs. of  5 variables:
 $ name        : int  1 2 3 4 5
 $ Intercept      : int  1 2 3 4 5
 $ Interecpt.95.CI: int  2 1 5 4 3
 $ BAC            : int  1 2 3 4 5
 $ BAC.95.CI      : int  3 5 2 4 1

т.е. Почему переменные q4 внезапно изменились?

Answer 1

Краткий ответ - факторы, преобразованные в их внутренние числовые коды.Это произошло во время cbind() вызова:

R> set.seed(1)
R> dat <- data.frame(A = factor(sample(1:5, 10, rep = TRUE)), 
+                    B = factor(sample(100:200, 10, rep = TRUE)))
R> head(dat)
  A   B
1 2 120
2 2 117
3 3 169
4 5 138
5 2 177
6 5 150
R> str(dat)
'data.frame':   10 obs. of  2 variables:
 $ A: Factor w/ 5 levels "1","2","3","4",..: 2 2 3 5 2 5 5 4 4 1
 $ B: Factor w/ 9 levels "117","120","138",..: 2 1 5 3 7 4 6 9 3 8
R> cbind(name = dat$A, foo = dat$B)
      name foo
 [1,]    2   2
 [2,]    2   1
 [3,]    3   5
 [4,]    5   3
 [5,]    2   7
 [6,]    5   4
 [7,]    5   6
 [8,]    4   9
 [9,]    4   3
[10,]    1   8

Причина в том, что cbind() создает матрицу, и именно здесь происходит преобразование.В этом случае было бы проще создать новый фрейм данных:

R> dat2 <- data.frame(name = dat$A, foo = dat$B)
R> dat2
   name foo
1     2 120
2     2 117
3     3 169
4     5 138
5     2 177
6     5 150
7     5 172
8     4 200
9     4 138
10    1 178

, а не cbind(), за которым следует пара вызовов as.data.frame().

Но реальный источникпроблема заключается в том, что числовые данные сохраняются как фактор в q2.Как эти данные считывались или генерировались в R?Если они были зачитаны в R, то почему в итоге фактор?Обычно данные все числовые в столбце R будут читаться в значениях в виде чисел.Если в столбце данных есть что-то похожее на текст, оно будет преобразовано в фактор.Поэтому я постараюсь решить эту проблему - почему данные были q2 факторами - поскольку это может указывать на некоторые проблемы с чтением или генерацией данных, о которых вы не знаете.