Запуск нескольких строк кода в функции R

Question

Я хотел бы запустить несколько строк кода в функции.Есть ли простой способ запустить несколько строк кода в R, поэтому мне не нужно запускать одну строку кода за другой?Например, как метод void в Java?

a() {
data$Item <- gsub(" Grams ", "g ", data$Item);
data$Item <- gsub("Grams ", "g ", data$Item);
data$Item <- gsub(" GRAMS ", "g ", data$Item);
data$Item <- gsub("GRAMS ", "g ", data$Item);
data$Item <- gsub("grams", "g ", data$Item);
data$Item <- gsub("Grams", "g ", data$Item);
}

Если я запускаю (), то все команды выполнены, но он также говорит ->

Error: unexpected '}' in "}"

Спасибо за вашу помощь!

Answer 1

Вы можете просто поместить строку в нижний регистр и сделать один gsub(), а затем обработать дополнительные пробелы с помощью trimws().

data$Item <- gsub("grams", "g ", tolower(data$Item))

---

Но вы можете сделать такую ​​функцию, какthis:

my_function <- function() {
    data$Item <<- gsub(" Grams ", "g ", data$Item)
    data$Item <<- gsub("Grams ", "g ", data$Item)
    data$Item <<- gsub(" GRAMS ", "g ", data$Item)
    data$Item <<- gsub("GRAMS ", "g ", data$Item)
    data$Item <<- gsub("grams", "g ", data$Item)
    data$Item <<- gsub("Grams", "g ", data$Item)
}
my_function()

Используйте двойной <<- для глобального изменения значений, а не только внутри функции.