Преобразуйте столбцы в конкретные значения, затем включите их в виде строк с их предыдущими значениями.

Question

У меня есть несколько столбцов с некоторыми значениями, связанными с ними. Я хочу дать каждому столбцу (a и b) значения (1 и 2) и поместить их в строку. Вот код, чтобы лучше увидеть преобразование:

#Create a dataframe, let's day a and b are the name of some brands
df = data.frame(a=c(1,2,3),b=c(4,5,6)) 

# I want to assign the numbers 1 and 2 to brand a and b
df1 = data.frame(brand=c(1,1,1,2,2,2), value=c(1,2,3,4,5,6)) 

Мне нужна функция, которая автоматически делает это: преобразование df в df1 *

РЕДАКТИРОВАТЬ: Для контекста, я делаю это преобразование для теста Anova

Answer 1

Как насчет этого:

library(tidyr)
library(dplyr)

df <- data.frame(a=c(1,2,3),b=c(4,5,6))

df1 <- gather(df, brand, value) %>% ## Convert columns into rows
  mutate(brand = as.numeric(as.factor(brand))) ## Convert a and b into 1 and 2