«команда» в R с регистрозависимым

Question

Я пытаюсь найти индексы в кадре данных, который содержит определенную строку. Но я бы хотел, чтобы моя строка была нечувствительной к регистру. Скажите, я хочу найти номер столбца в моем кадре данных COLUMN73, и я ожидаю, что он вернет 73, потому что это семьдесят третий столбец. У меня есть,

which(names(mydata) == "COLUMN73") 

Можно ли сделать мой поиск строки чувствительны к регистру так, чтобы получить 73, даже если я ищу скажем, CoLumN73?

Спасибо.

Answer 1

Вы можете конвертировать ваши имена в верхние регистры

which(toupper(names(mydata)) == "COLUMN73") 

Answer 2

Можно индексировать его с grepl с помощью ignore.case аргумент

x <- c("col7", "COL73", "Col17", "CoL73", "cOl73") 
grepl("col73", x, ignore.case=TRUE) 
# [1] FALSE TRUE FALSE TRUE TRUE 

Аналогично, grep возвращает числовой индекс

grep("col73", x, ignore.case=TRUE) 
# [1] 2 4 5 

Для подмножеств столбцов фрейма данных

df[grepl("col73", names(df), ignore.case=TRUE)] 

Answer 3

Полностью отредактированный с поправкой на код Уилла. Спасибо Дэвиду Аренбургу за это.

x <- rep(c("col7", "COL73", "Col17","COLUMN73", "CoL73", "cOl73"),1e4) 
scriven<- function(x) grepl("COLUMN73", x, ignore.case=TRUE) 
will<-function(x) which(toupper((x)) == "COLUMN73") 
microbenchmark(scriven(x),will(x)) 
Unit: milliseconds 
     expr  min  lq median  uq  max neval 
scriven(x) 30.55911 33.04852 34.91243 37.01039 39.59833 100 
    will(x) 26.10728 26.47967 27.21592 28.76291 30.46163 100