Присвоить номер именам

Question

у меня два стола.Один из них содержит четыре столбца, первый столбец - имена, а остальные три столбца - числа.Я хочу присвоить среднему числу чисел имя.

ID   number_1  number_2  number_3
A01  13        11        12
A02  18        16        17
......

Во второй таблице есть столбец, содержащий имена из первой таблицы, и я хочу заменить имена на средние числа.Например:

v1  v2  v3  ......
8   5   A01 ......
6   3   A02 ......

замените имя, чтобы я мог получить:

v1  v2  v3  ......
8   5   12  ......
6   3   17  ......

Я понятия не имею, как это сделать.Надеюсь, вы понимаете мой вопрос.

Answer 1

Предполагая, что обе ваши таблицы являются фреймами данных и имеют одинаковый порядок (т. Е. A01, A02 и т. Д.)

df1 <- read.table(text = "ID   number_1  number_2  number_3
                         A01  13        11        12
                         A02  18        16        17",
                 header = T)

df2 <- read.table(text = "v1  v2  v3
                          8   5   A01
                          6   3   A02", 
                  header = T)

df1means <- rowMeans(df1[2:4])

df2$v3 <- df1means

df2

#    v1 v2 v3
# 1  8  5  12
# 2  6  3  17