Объединить элементы списка, которые имеют разные измерения r
У меня есть дф:
df= data.frame(year=c(rep(2018,4),rep(2017,3)),Area=c(1:4,1:3),P=1:7,N=1:7)
Я хочу разделить его по годам, а затем снова объединить все вместе, чтобы я мог видеть годы в виде столбцов для каждой области. Для этого я разделяю и объединяю:
s=split(df,df$year)
m=merge(s[[1]][,2:4],[s[[2]][,2:4],by='Area',all=1)
colnames(m)=c('area','P2018','C2018','P2017','C2017')
Я уверен, что есть более эффективный способ, особенно потому, что вероятность ошибок очень высока, когда я включаю данные за другие годы.
Какие-либо предложения?
Стоит ли изучать PHP в 2023-2024 годах?
Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...
Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией
В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.
Приемы CSS-макетирования - floats и Flexbox
Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...
Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest
В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...
Концепция локализации и ее применение в приложениях React ⚡️
Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...
Пользовательский скаляр GraphQL
Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...
0
0
138
2
Перейти к ответу
Данный вопрос помечен как решенный
Ответы 2
Ответ принят как подходящий
Мы можем gather данные преобразовать в длинную форму, исключая столбцы year и Area, uniteyear, а затем spread в широкий формат.
library(dplyr)
library(tidyr)
df %>%
gather(key, value, -year, -Area) %>%
unite(key, key, year, sep = "") %>%
spread(key, value)
# Area N2017 N2018 P2017 P2018
#1 1 5 1 5 1
#2 2 6 2 6 2
#3 3 7 3 7 3
#4 4 NA 4 NA 4
Мы можем сделать это с помощью dcast from data.table, который может занимать несколько столбцов value.var.
library(data.table)
dcast(setDT(df), Area ~ year, value.var = c("P", "N"))
# Area P_2017 P_2018 N_2017 N_2018
#1: 1 5 1 5 1
#2: 2 6 2 6 2
#3: 3 7 3 7 3
#4: 4 NA 4 NA 4
Другие вопросы по теме
Преобразование кадра данных в список списков на основе общих функций
Как проверить, равна ли сумма любых N номеров элементов в списке или больше значения в Kotlin
Запись списка списков в отдельные файлы CSV
Преобразовать строку в список списка диктов python
Как лучше всего соединить строку со значением элемента словаря?
Сопоставить два списка по общему значению (id)
Установите индекс для группы повторяющихся значений строк в файле csv с помощью Python
Проблемы с повторением списка или набора элементов в Terraform
Создавать комбинации из списка и удалять, если подстрока символов-разделителей находится более чем в 1 подэлементе элемента списка
Использование словаря для вырезания частей строк в списке
Похожие вопросы
Копирование файлов из папок и подпапок в другую папку и сохранение структуры папок
Как эффективно проверить, находится ли вектор чисел в интервале, определяемом фреймом данных
Репликация фрейма данных по группам
Преобразование кадра данных в список списков на основе общих функций
Json в Dataframe: ошибка: ошибка в 1:nrow(test): аргумент длины 0
Наложение исходных чисел на гистограмму с пропорциями
Как перезаписать жестко заданный аргумент функции параметром точек (...)?
RDCOMClient + поиск электронной почты Outlook с использованием интервала дат в R
Запись списка списков в отдельные файлы CSV
Матрица расстояний в измененный вектор расстояний, отсортированных по позициям