Столбцы фиктивных переменных на основе строк из других столбцов

У меня есть база данных с идентификационным номером пациента и лечением, которое они получили. Я хотел бы иметь фиктивную колонку для каждого отдельного ИНДИВИДУАЛЬНОГО лечения (т.е. как в случае, когда пациент получал лечение A, B, C, D).

Это очень упрощено, потому что у меня более 20 процедур и тысячи пациентов, и я не могу придумать простой способ сделать это.

example <- data.frame(id_number = c(0, 1, 2, 3, 4), 
                      treatment = c("A", "A+B+C+D", "C+B", "B+A", "C"))

Я хотел бы иметь что-то вроде этого:

desired_result <- data.frame(id_number = c(0, 1, 2, 3, 4), 
                             treatment = c("A", "A+B+C+D", "C+B", "B+A","C"),
                             A=c(1,1,0,1,0), 
                             B=c(0,1,1,1,0),
                             C=c(0,1,1,0,1),
                             D=c(0,1,0,0,0))

r function dplyr dummy-variable

18.07.2019 23:13

Стоит ли изучать PHP в 2026-2027 годах?

Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...

Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией

В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.

Приемы CSS-макетирования - floats и Flexbox

Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...

Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest

В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...

Концепция локализации и ее применение в приложениях React ⚡️

Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...

Пользовательский скаляр GraphQL

Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...

Перейти к ответу Данный вопрос помечен как решенный

Ответы 2

Ответ принят как подходящий

Одна tidyverse возможность может быть:

example %>%
 mutate(treatment2 = strsplit(treatment, "+", fixed = TRUE)) %>%
 unnest() %>%
 spread(treatment2, treatment2) %>%
 mutate_at(vars(-id_number, -treatment), ~ (!is.na(.)) * 1)

  id_number treatment A B C D
1         0         A 1 0 0 0
2         1   A+B+C+D 1 1 1 1
3         2       C+B 0 1 1 0
4         3       B+A 1 1 0 0
5         4         C 0 0 1 0

Или:

example %>%
 mutate(treatment2 = strsplit(treatment, "+", fixed = TRUE)) %>%
 unnest() %>%
 mutate(val = 1) %>%
 spread(treatment2, val, fill = 0)

18.07.2019 23:34

base версия:

example["A"] <- as.numeric(grepl("A", example[,"treatment"]))
example["B"] <- as.numeric(grepl("B", example[,"treatment"]))
example["C"] <- as.numeric(grepl("C", example[,"treatment"]))
example["D"] <- as.numeric(grepl("D", example[,"treatment"]))

example

  id_number treatment A B C D
1         0         A 1 0 0 0
2         1   A+B+C+D 1 1 1 1
3         2       C+B 0 1 1 0
4         3       B+A 1 1 0 0
5         4         C 0 0 1 0

Функция grepl проверяет наличие каждого шаблона в каждой строке, а as.numeric изменяет логическое значение ИСТИНА/ЛОЖЬ на 1/0.

18.07.2019 23:36

Другие вопросы по теме

Функция для ссылки на столбцы по имени или индексу

Как сравнить каждый элемент в массиве и вычислить процент от того, сколько из них одинаковы в Python?

Использование вложенной функции с lapply

Мне нужно передать аргументы из внешней функции во внутреннюю функцию

Являются ли «комбинации, операторы которых сами являются составными выражениями» синонимами функций переменных?

Как умножить всю строку в диапазоне на число

Создайте функцию о суммировании + группировке по

Ввод элементов списка в функцию

Оператор возврата не изменяет переменную в глобальной области

Вопрос об итерации функции в python

Столбцы фиктивных переменных на основе строк из других столбцов

Ответы 2

Другие вопросы по теме

Похожие вопросы