я есть большой набор данных с координатами x, y 91 различных траекторий, различаемых переменнойID:

>     head(trjct)
     t        x      y        z     Etot   ID
1 0.00 696621.4 167730 1680.960 1192.526 sim1
2 0.01 696621.4 167730 1680.959 1192.526 sim1
3 0.02 696621.4 167730 1680.958 1192.526 sim1
4 0.04 696621.4 167730 1680.952 1192.526 sim1
5 0.06 696621.4 167730 1680.942 1192.526 sim1
6 0.08 696621.4 167730 1680.929 1192.526 sim1

Мне удалось преобразовать эти координаты в строки:

  coordinates(trjct) <- ~x+y
  trjct_lines_coords <- lapply(split(trjct, trjct$ID), function(x) Lines(list(Line(coordinates(x))), x$ID[1L])) #first column = row number

Однако информация, содержащаяся в переменнойEtot не входит Как я могу создать список строк, каждая с одной строкой и соответствующейEtot значения в списке?

Я хочу создать data.frame для строк, сгруппированных по id (по одной строке для каждой строки), и я также хочу сохранить информацию, содержащуюся вEtot.