R綁定數據幀，同時添加具有列表ID的列

Question

我有一個包含1到N個數據幀的列表。 它們都具有相同的列，我需要逐行將它們加入。

問題是，我需要向新ID中添加一個新列，該ID與每個原始數據幀相關。

舉個例子：

$ tracks   :List of 1
  ..$ :List of 2
  .. ..$ 01-DEZ-15 11:57:34:'data.frame':   19 obs. of  5 variables:
  .. .. ..$ lon       : num [1:19] -48.6 -48.6 -48.6 -48.6 -48.6 ...
  .. .. ..$ lat       : num [1:19] -26.8 -26.8 -26.8 -26.8 -26.8 ...
  .. .. ..$ ele       : chr [1:19] "14.56" "21.77" "14.56" "15.52" ...
  .. .. ..$ time      : POSIXct[1:19], format: "2015-12-01 07:35:03" "2015-12-01 07:35:21" ...
  .. .. ..$ extensions: chr [1:19] "0" "0" "0" "0" ...
  .. ..$ NA                :'data.frame':   1899 obs. of  5 variables:
  .. .. ..$ lon       : num [1:1899] -48.6 -48.6 -48.6 -48.6 -48.6 ...
  .. .. ..$ lat       : num [1:1899] -26.8 -26.8 -26.8 -26.8 -26.8 ...
  .. .. ..$ ele       : chr [1:1899] "14.08" "13.12" "13.12" "13.12" ...
  .. .. ..$ time      : POSIXct[1:1899], format: "2015-12-01 07:39:43" "2015-12-01 07:39:53" ...
  .. .. ..$ extensions: chr [1:1899] "0" "0" "0" "0" ...

我需要將兩個列表合並到一個數據框中，並將列表編號添加為新列。

與此類似：

      Lon            Lat    Ele         Time           Ext  ID
1   -48.60467   -26.78866   14.56   2015-12-01 07:35:03 0   1
2   -48.60467   -26.78868   21.77   2015-12-01 07:35:21 0   1
3   -48.60468   -26.78869   14.56   2015-12-01 07:35:45 0   1
4   -48.60468   -26.78869   15.52   2015-12-01 07:36:09 0   2
5   -48.60468   -26.78872   13.12   2015-12-01 07:36:46 0   2

可以有效完成任務嗎？

感謝您的幫助。 最好的祝福。

Answer 1

我通常使用這種襯板：

tracks <- list(df1=iris, df2=iris)
Z_both <- do.call(rbind, mapply(transform, tracks, ID=seq_along(tracks), SIMPLIFY = FALSE))

mapply(transform)將為每個data.frame添加一列，然后do.call(rbind)將其堆疊。