Converter ponto de coordenadas em linhas de coordenadas - e reter variáveis

Question

Mar 13, 2018, 10:27 PM

Converter ponto de coordenadas em linhas de coordenadas - e reter variáveis

Eu tenho um grande conjunto de dados com as coordenadas x, y de 91 trajetórias diferentes, distinguidas pela variávelID:

>     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

Consegui converter essas coordenadas em linhas:

  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

No entanto, as informações contidas na variávelEtot não está incluído. Como posso criar uma lista de linhas, cada uma com uma linha e correspondenteEtot valores na lista?

Quero criar um data.frame para as linhas, agrupadas por ID (uma linha para cada linha) e também quero manter as informações contidas emEtot.