Вновь созданный фрейм данных теряет метки для категорий своих векторов - PullRequest
Новая
       9

Вновь созданный фрейм данных теряет метки для категорий своих векторов

0 голосов
/ 09 мая 2018

У меня есть такой фрейм данных: 

> str(dynamics)
'data.frame':   3517 obs. of  3 variables:
 $ id   : int  1 2 3 4 5 6 7 8 9 10 ...
 $ y2015: int  245 129 301 162 123 125 115 47 46 135 ...
 $ y2016: int  NA 385 420 205 215 295 130 NA NA 380 ...

Я вынимаю 3 вектора и называю их по-разному,
Колонка 1: 

> plantid <- dynamics$id
> head(plantid)
[1] 1 2 3 4 5 6

Колонка 2:
(Я делю его на разные классы и обозначаю их 2,3,4 и 5) 

> y15 <- dynamics$y2015
> year15 <- cut(y15, breaks = c(-Inf, 50, 100, 150, Inf), labels = c("2", "3", "4", "5"))
> str(year15)
 Factor w/ 4 levels "2","3","4","5": 4 3 4 4 3 3 3 1 1 3 ...
> head(year15)
[1] 5 4 5 5 4 4
Levels: 2 3 4 5

Колонка 3:
(То же самое здесь) 

> y16 <- dynamics$y2016
> year16 <- cut(y16, breaks = c(-Inf, 50, 100, 150, Inf), labels = c("2", "3", "4", "5"))
> str(year16)
 Factor w/ 4 levels "2","3","4","5": NA 4 4 4 4 4 3 NA NA 4 ...
> head(year16)
[1] <NA> 5    5    5    5    5   
Levels: 2 3 4 5

Пока все хорошо!

Проблема возникает, когда я объединяю вышеупомянутые 3 вектора на cbind(), чтобы сформировать новый фрейм данных, вновь созданные векторные уровни исчезают

Посмотрите на мой код: 

SD1 = data.frame(cbind(plantid, year15, year16))
head(SD1)

и я получаю фрейм данных вот так: 

> head(SD1)
  plantid year15 year16
1       1      4     NA
2       2      3      4
3       3      4      4
4       4      4      4
5       5      3      4
6       6      3      4

Как вы можете видеть, уровни 2-го и 3-го столбца изменились с 2, 3, 4, 5 обратно на 1, 2, 3, 4
Как мне это исправить?

1 Ответ

0 голосов
/ 09 мая 2018

cbind чаще всего используется для объединения объектов в матрицы. Он удаляет специальные атрибуты из входных данных, чтобы обеспечить их совместимость для объединения в один объект. Это означает, что типы данных со специальными атрибутами (такими как атрибуты имени и формата для факторов и дат) будут упрощены до их базовых числовых представлений. Вот почему cbind превращает ваши факторы в числа.

И наоборот, data.frame() сам по себе сохранит отдельные атрибуты объекта. В этом случае использование cbind не требуется. Чтобы сохранить ваши уровни факторов, просто используйте: 

SD1 <- data.frame(plantid, year15, year16)
...