zkuralt / wgstogk Goto Github PK

Current image is a bit out of date.

Add a button which enables user to export the converted data.frame.

Additionally we could add function to pick coordinates from map.

I would add elevation to the table of converted coordinates, and not keep it in separate table like currently implemented.

So it is easier to check coordinates in the map, when converting multiple coordinates.

The ultimate solution would be that coordinates (row) would highlight when one would click (or hover) on the marker and vice versa.

To upoad a file, two steps need to be taken. User has to choose what format the data is in and then the actual step of selecting and uploading the file. I would read file type from the extension of the file. In case it's a csv, the separator menu is already present below.
Perhaps add some text which says that you need to choose the separator if and only if you are uploading a csv file.

Currently only one format of coordinates is permitted to be entered at a time. Modify application that can handle different formats.

It would be easier to "version control" if we had functions in separate files. That way we can work on individual function and avoid any merge problems.

Pick a CRS from dropdown menu or enter name of CRS.

When user uploads a file, add support for .gpx as well.

Check how to clean up temporary database files.

and also exporting converted coordinates as CSV file

Additionally we could add function to pick coordinates from map.

it seems that anyWGStoDec() function does not behave as planned.

functions below recognise coordinates format (even though it is not deg_min_sec or deg_dec_min and convert it (incorrectly)

xy <- tryCatch(sapply(x, measurements::conv_unit, from = 'deg_min_sec', to = 'dec_deg'), 
                 error = function(e) e, warning = function(w) w) 
  if (is.character(xy)) { 
    return(as.numeric(xy))
  }
  xy <- tryCatch(sapply(x, measurements::conv_unit, from = 'deg_dec_min', to = 'dec_deg'), 
                 error = function(e) e, warning = function(w) w) 
  
  if (is.character(xy)) { 
    return(as.numeric(xy))
  }

Use Google Elevation API and google_elevation() function (googleways package)