Grepl для любой разрешенной строки
Я создаю команду grepl с параметром функции. Я бы хотел пропустить команду grep, если она не нужна. Я мог бы сделать это с помощью операторов управления, но я хотел бы передать значение, которое возвращает все строки.
some_sub <- function(data, descr = "*.*"){
return(data %>% filter(grepl(descr, description)))
}
Я хотел бы иметь следующую работу:
some_sub(data, "Cabbage")
some_sub(data) # returns everything
где данные
data <- structure(list(description = structure(c(1L, 1L, 2L, 1L),
.Label = c("Cabbage","Carrot"),
class = "factor"),
weight = c(12L, 9L, 7L, 15L)),
class = "data.frame",
row.names = c(NA,-4L))
Стоит ли изучать PHP в 2023-2024 годах?
Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...
Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией
В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.
Приемы CSS-макетирования - floats и Flexbox
Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...
Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest
В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...
Концепция локализации и ее применение в приложениях React ⚡️
Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...
Пользовательский скаляр GraphQL
Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...
2
0
67
1
Перейти к ответу
Данный вопрос помечен как решенный
Ответы 1
Ответ принят как подходящий
Можно было бы просто использовать . (поскольку это метасимвол для любого символа) в качестве соответствия по умолчанию для параметра descr.
Добавлен еще один параметр colNm, чтобы немного обобщить
Если есть пробелы ("") и вы хотите сопоставить их, может быть лучше использовать * по умолчанию.
some_sub <- function(data, colNm, descr = "."){
colNm <- enquo(colNm)
data %>%
filter(grepl(descr, !!colNm))
}
some_sub(iris, Species, "setosa")
some_sub(iris, Species)
Использование данных OP
some_sub(data, description, "Cabbage")
# description weight
#1 Cabbage 12
#2 Cabbage 9
#3 Cabbage 15
some_sub(data, description)
# description weight
#1 Cabbage 12
#2 Cabbage 9
#3 Carrot 7
#4 Cabbage 15
Другие вопросы по теме
Rshiny: фильтровать строки текстового столбца Datatable по нескольким пользовательским вводам
Grepl по двум векторам поэлементно
Как искать строки со скобками в R
R: grepl выводит совпадения в неправильном порядке
Как искать только определенную строку в переменной в R
Использование grepl для подмножества фрейма данных, содержащего одно и то же упоминание некоторого текста в двух столбцах
Как выполнить grepl с двумя объектами шаблона в R
Сопоставление одного символа в строке в R
Очистка данных с помощью grepl для [:alpha:]:[:punct:]
Есть ли способ точно сопоставить строку в одном столбце с парой строк в другом столбце в R?
Похожие вопросы
Pyomo + сетчатая ошибка 6 ручка недействительна
Как обновить значения фрейма данных в зависимости от условий?
Какая польза от этого знака %<-% в r
В чем разница между функциями print() и print(paste()) в R?
Htmltab обходной путь «таблица не найдена»?
Применить функцию ко всем парам в одной группе
Объединить элементы списка, которые имеют разные измерения r
Копирование файлов из папок и подпапок в другую папку и сохранение структуры папок
Как эффективно проверить, находится ли вектор чисел в интервале, определяемом фреймом данных
Репликация фрейма данных по группам