Сочетание данных и создание столбца с именами данных в R

Question

Я пытаюсь объединить два кадра данных, но создаю столбец, содержащий часть каждого имени фреймворка, чтобы я мог определить, из какого датафрейма были получены данные. В dataframes являются

Acme_types_number <- structure(list(type = structure(c(3L, 1L, 2L, 4L, 3L), .Label = c("blue", "green", "red", "yellow"), class = "factor"), number = c(4L, 6L, 54L, 5L, 5L)), .Names = c("type", "number"), class = "data.frame", row.names = c(NA, -5L)) 

и

Acme2_types_number <- structure(list(type = structure(c(2L, 3L, 1L, 4L, 3L), .Label = c("blue", "green", "red", "yellow"), class = "factor"), number = c(4L, 5L, 6L, 5L, 5L)), .Names = c("type", "number"), class = "data.frame", row.names = c(NA, -5L)) 

я могу объединить их в единый dataframe использованием

df <- rbind(Acme_types_number, Acme2_types_number) 

, который дает следующую dataframe ДФ:

type number 
red   4 
blue  6 
green  54 
yellow  5 
red   5 
green  4 
red   5 
blue  6 
yellow  5 
red   5 

Однако, Я хочу также добавить co lumn, который содержит первую часть каждого имени dataframe (например, часть перед подчеркиванием), чтобы дать:

factory type number 
    Acme red  4 
    Acme blue  6 
    Acme green  54 
    Acme yellow  5 
    Acme red  5 
    Acme2 green  4 
    Acme2 red  5 
    Acme2 blue  6 
    Acme2 yellow  5 
    Acme2 red  5 

Кто-нибудь знает, как сделать это в R?

Answer 1

Как что:

rbind(data.frame(factory = "Acme", Acme_types_number), 
     data.frame(factory = "Acme2", Acme2_types_number))