在R函数中运行多行代码

Question

I would like to run some code lines in a function. Is there a easy way to run multiple code lines in R, so i don't need to run one code line after another? For example like the void method in 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);
}

If i run a() like that all commands are done but it also says ->

Error: unexpected '}' in "}"

Thanks for your help!

Answer 1

You can simply put your string in lower case and do a single gsub() , and then deal with extra spaces with trimws() .

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

---

But you can make a function like 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()

Use the double <<- for changing the values globally, and not just inside the function.