[R-sig-Geo] Local_coord

[Oscar Perpiñan]

Hi,

You can solve it using base functions if you prefer:

coord <- read.delim('Coord_ha_R.txt')
ref <- read.delim('ref_sub_parc_coord.txt')

ref <- transform(ref, sub.parc = substr(sub.parc, 9, 10))
coordRef <- merge(coord, ref, by.x = 'Sub_parc', by.y = 'sub.parc')
coordRef <- transform(coordRef, Xref = X_local + X, Yref = Y_local + Y)

Best,

Oscar.
-----------------------------------------------------------------
Oscar Perpiñán Lamigueiro
Dpto. Ingeniería Eléctrica (ETSIDI-UPM)
Grupo de Sistemas Fotovoltaicos (IES-UPM)
URL: http://oscarperpinan.github.io
Twitter: @oscarperpinan