Обратный способ изменения содержимого ячейки (строки) на основе условия ключевого слова с содержимым другой ячейки плюс текст - PullRequest
0 голосов
/ 26 марта 2019

Я только начинаю изучать новые подходы, и в настоящее время я ищу, как решить следующую проблему:

в следующем фрейме данных:

enter image description here

Я ищу заменить все ячейки "уровня чувствительности" именем канала, найденного на 1 строку вверх, во 2-м столбце, в сочетании со словом "чувствительность"

после успешного завершения.делая это, я хочу запустить его через другое решение проблемы с другой частью моей проблемы, которое опубликовано здесь

это код для создания точной копии моего фрейма данных:

df <- structure(list(Parameter = c("Trigger level (mV)", "Smart Triggered!", 
"FL Red Maximum > 9", "CytoUSB Block size", "Instrument", "Beam width", 
"Core speed", "User Comments", "Measurement date", "Measurement duration", 
"Flow rate (µL/sec)", "Channel 1", "Channel 2", "Channel 3", 
"Channel 4", "  sensitivity level", "Channel 5", "  sensitivity level", 
"Channel 6", "  sensitivity level", "Channel 7", "  sensitivity level", 
"Total number of particles", "Smart triggered number of particles", 
"Concentration (part/µL)", "Volume (µL)"), Value = c(" 10.49", 
"", "", " Auto (maxTimeOut 5s )", " EMSO II", " 5", " 2.2", " ", 
" 15-Apr-16 5:12:21 AM", " 36", " 2.06", " Trigger1", " FWS L", 
" FWS R", " SWS  TRIGGER", " 55", " FL Yellow", " 100", " FL Orange", 
" 100", " FL Red", " 100", " 1344", " 1344", " 2062.71614038604", 
" 46.7626146474752")), class = "data.frame", row.names = c(NA, 
-26L))

1 Ответ

1 голос
/ 26 марта 2019

Это должно дать то, что вы хотите:

library(dplyr)

df %>% 
  mutate(Parameter = ifelse(
    Parameter == "  sensitivity level",
    paste(lag(Value), "sensitivity"),
    Parameter
  ))
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...