Имитация `simplify=F` в `apply()` для версий R < 4.1.0
Учитывая двоичную матрицу, я хочу сгенерировать список позиций 1 по строке. Например:
> M <- matrix(c(1,1,0,0,1,1,1,0,1), 3, 3)
> M
[,1] [,2] [,3]
[1,] 1 0 1
[2,] 1 1 0
[3,] 0 1 1
> apply(M==1, 1, which, simplify = FALSE)
[[1]]
[1] 1 3
[[2]]
[1] 1 2
[[3]]
[1] 2 3
Однако в версиях R до 4.1.0 функция apply() автоматически упрощается, что означает, что результатом иногда будет не список, а упрощение до вектора или матрицы. Например:
> apply(M==1, 1, which)
[,1] [,2] [,3]
[1,] 1 1 2
[2,] 3 2 3
Как я могу гарантировать, что на выходе всегда будет список, даже в более ранних версиях R, когда параметр simplify = F недоступен для apply()? Спасибо!
Стоит ли изучать PHP в 2023-2024 годах?
Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...
Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией
В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.
Приемы CSS-макетирования - floats и Flexbox
Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...
Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest
В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...
Концепция локализации и ее применение в приложениях React ⚡️
Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...
Пользовательский скаляр GraphQL
Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...
0
1
27
2
Перейти к ответу
Данный вопрос помечен как решенный
Ответы 2
Ответ принят как подходящий
Вы можете использовать asplit, который разбивает матрицу на список векторов по выбранному краю. Затем используйте lapply на результате, чтобы применить which к каждому вектору.
lapply(asplit(M == 1, 1), which)
#> [[1]]
#> [1] 1 3
#>
#> [[2]]
#> [1] 1 2
#>
#> [[3]]
#> [1] 2 3
Работает отлично и лишь незначительно медленнее, чем при использовании apply(simplify=T). Спасибо!
—
18.03.2022 15:00
Мы можем использовать which с arr.ind = TRUE, а затем split рядом с «строкой».
ind <- which(M == 1, arr.ind = TRUE)
split(ind[,2], ind[, 1])
$`1`
[1] 1 3
$`2`
[1] 1 2
$`3`
[1] 2 3
Другие вопросы по теме
Вывод типа Dart List.fold против List.reduce
Flutter - тип «Список <динамический>» не является подтипом типа «Список <Модель>?»
Найдите значение в списке, если есть несколько значений, напечатайте все значения, иначе напечатайте соответствующие значения из другого списка
Как работать между 2D-списками в Python в цикле?
Умножить все матрицы во вложенном списке вместе
Вставить нули в список на Прологе
Тип значения 'List<Object?> не может быть присвоен переменной типа 'List<Looking Gender>
Как распределить значение между числами в списке
Как создать список имен классов и перебрать в нем статический метод?
Список списков python для диктовки, когда ключ появляется много раз
Похожие вопросы
Подсчитать количество различных переменных подряд
Как переименовать имена столбцов mutliples (с префиксом) в соответствии с соответствующим именем фрейма данных [R]
R：Как использовать ggplot2 порядок месяца x ось
Что значит Xbar?
Как преобразовать лидарный формат las в data.frame?
Условная фильтрация на основе сгруппированных данных в R с использованием dplyr
Невозможно установить пакеты R, так как не найден make, хотя Rtools установлен и PATH включен
Объединить строки в группы в R (или Stata)
Можно ли изменить размер шрифта в прогнозе :: autoplot ()?
R: выполнить цикл по всем переменным и отобразить таблицу частот для каждой
Я изменил пример в исходном сообщении на случай, когда это решение не сработает.