R schreiben EXIF-Daten in JPEG-Datei

Question

Für R fand ich eine Möglichkeit, nur die EXIF-Daten zu lesen.

Gibt es in R die Möglichkeit, EXIF-Daten in eine JPEG-Datei zu schreiben?

Answer 1

Danke an alle, die geantwortet haben. Als Ergebnis erhielt ich die folgende Lösung.

installieren ExifTool, verwende ich Ubuntu comand:

sudo apt libimage-exiftool-perl

Da ist in meinem R-Code installieren, GPS hinzuzufügen, um Bildkoordinaten ich benutze:

exiftool_cmd <- paste("exiftool -GPSLongitudeRef=E -GPSLongitude=",latlon_exif[i,11]," -GPSLatitudeRef=N -GPSLatitude=",latlon_exif[i,10]," ","./nodejpg/",latlon_exif[i,4],".jpg",sep='') 
system(exiftool_cmd) 

Wo latlon_exif [i, 11] und latlon_exif [i, 10] - Koord inates, latlon_exif [i, 4] - Name der Datei.

Um Daten und Zeit zum Bild hinzufügen, die ich benutze:

exiftool_cmd <- paste("exiftool -alldates=",shQuote(date_exif[which(date_exif[,4]%in%latlon_exif[i,4]),8])," ","./nodejpg/",latlon_exif[i,4],".jpg",sep='') 
system(exiftool_cmd) 

Wo shQuote (date_exif [das (date_exif [4]% in% latlon_exif [i, 4]), 8]) Daten und Zeit im Format: '2017-11-16 22:33:17'