Вопрос или проблема
Добрый день. У меня есть набор данных в длинном формате с идентификаторами овец и их ягнят. Существует несколько строк на каждую овцу, так как у них несколько ягнят, каждый с уникальным идентификатором. Я не хочу подсчитывать количество на овцу, а хотел бы как-то добавить столбец, который нумерует ягнят 1, 2, 3… для каждой овцы, чтобы я мог использовать эту переменную для перевода данных в широкий формат. Какие-то мысли? Я включил пример и лучше всего знаком с R.
Я попробовал это и не уверен, где моя кодировка идет наперекосяк… births — это имя набора данных:
for(i in 2:nrow(births)) {
births$num_lambs[i, ] <- ifelse(births$Dam_last9[i, ]==births$Dam_last9[(i-1), ], births$num_lambs[i-1,]+1, 1)
}
Ответ или решение
Здравствуйте! Ваша задача заключается в добавлении столбца с последовательной нумерацией ягнят для каждой овцы (ewe) в вашем наборе данных. Это следует сделать для того, чтобы позже развернуть данные из длинной формы в широкую. Давайте разберёмся, как можно решить эту задачу с помощью языка программирования R.
Исходя из вашего описания, у вас, вероятно, есть столбец с идентификатором овцы и столбец с идентификатором ягнёнка. Вам нужно добавить новый столбец с порядковыми номерами ягнят для каждой овцы. Это можно сделать с помощью функции dplyr, которая является частью пакета tidyverse. Вот решение:
Решение:
- Установите и загрузите пакет
tidyverse:
Если у вас еще не установлен этот пакет, выполните команду:
install.packages("tidyverse")Затем загрузите его:
library(tidyverse)- Используйте
dplyrдля добавления порядкового номера ягнят:
births <- births %>%
group_by(Dam_last9) %>%
mutate(lamb_number = row_number()) %>%
ungroup()Пояснения:
-
group_by(Dam_last9): Эта функция группирует данные по столбцуDam_last9, который, как можно предположить, содержит идентификаторы овец. Это позволяет обрабатывать каждую группу (овец) отдельно. -
mutate(lamb_number = row_number()): Здесь создается новый столбецlamb_number, который присваивает уникальный последовательный номер каждому ягнёнку в пределах группы. -
ungroup(): Завершает группировку, чтобы другие операции не применялись ошибочно на уровне групп.
Заключение:
Такое решение добавит в ваш набор данных новый столбец lamb_number, который можно использовать для преобразования данных из длинного формата в широкий. Применение пакета tidyverse не только упрощает код, но и делает его более читабельным и легче поддерживаемым.
Если у вас возникнут дополнительные вопросы или потребуется помощь, не стесняйтесь обращаться. Удачи в работе с данными!