Повторно просматривайте список фреймов данных, чтобы создать новый столбец. - PullRequest
1 голос
/ 04 апреля 2019

У меня есть список фреймов данных DFList.Для каждого кадра данных в DFList я хотел бы создать новый столбец X4.

Small Example

X1 <- c(1,2,3,"X","Y")
X2 <- c(100,200,130,120,150)
X3 <- c(1000,250,290,122,170)
DF1 <- data.frame(X1,X2,X3)

X1 <- c(5,6,4,3,9)
X2 <- c(105,205,150,125,175)
X3 <- c(1500,589,560,512,520)
DF2 <- data.frame(X1,X2,X3)

DFList <- list(DF1,DF2)
names(DFList) <- c("DF1","DF2")
DFList

Чтобы создать новый столбец путем объединения значений из столбцов X1, X2и X3 я создал следующую функцию.

MyFUN <- function(V) {
  X4 <- paste(V[1],":",V[2],"-",V[3], sep = "")
  return(X4)
}

Однако у меня возникли проблемы с успешным выполнением этой функции ... Я попытался выполнить следующее, но нужный столбец X4 не добавляется в кадры данных, содержащиеся в списке..

print(DFList)

for (DF in DFList){
  for (num in (0:length(DFList))){
    DF["X4"] <- lapply(DF[num], FUN = MyFUN)
  }
}

print(DFList)

1 Ответ

3 голосов
/ 04 апреля 2019

Мы можем использовать lapply для циклического перебора элементов list и transform для создания paste ed компонентов (при условии, что у нас всего 3 столбца, а имена столбцов являются статическими

lapply(DFList, transform, X4 = paste0(X1, X2, X3))

Если у нас есть переменные столбцы

lapply(DFList,  function(x) {x$newCol <- do.call(paste0, x); x})
...