Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Форматы импорта и экспорта
Импортирование GPS информации с JPEG и отображение карты местности с помощью Wolfram|Alpha
Импортирование GPS информации с изображения в формате JPEG, и отображение карты местности при помощи Wolfram|Alpha.
In[1]:=
X
image = Import["wolfram.jpg", "ImageWithExif"];
In[2]:=
X
exif = OptionValue[OptionValue[Options[image], MetaInformation], "Exif"];
In[3]:=
X
FilterRules[exif, {"GPSLatitude", "GPSLatitudeRef", "GPSLongitude", "GPSLongitudeRef"}]
Out[3]=
In[4]:=
X
{image, WolframAlpha[(ToString[ "GPSLatitude" /. # /. {x_, y_, z_} :> N[x + y/60 + z/3600]] <> ("GPSLatitudeRef" /. #) <> ToString[ "GPSLongitude" /. # /. {x_, y_, z_} :> N[x + y/60 + z/3600]] <> ("GPSLongitudeRef" /. #1) &)[ exif], {"CartographicMap", "Image"}][[1, 2]]}
Out[4]=