本文へスキップ
からだにいいもの

Rのトピックスを中心に『まだ、まだ、知らない、役に立つ情報?』を発信します。

Analysis in R: “exifr” package to obtain EXIF data of photos

This is an introduction to a package for collecting EXIF data for photos. It is useful for photo management because it can capture the camera model and the conditions under which the photo was taken.

Perl installation is required for use on Windows. Please download and install “Strawberry Perl” from the link below before installing the package.

Strawberry Perl:http://strawberryperl.com/

Package version is 0.3.2. Checked with R version 4.2.2.

Install Package

Run the following command.

#Install Package
install.packages("exifr")
スポンサーリンク

Example

See the command and package help for details.

#Loading the library
library("exifr")

#Seleceimage file 
library("tcltk")
OpenFile <- paste0(as.character(tkgetOpenFile(title = "image file ",
                                              filetypes = '{"image file " {".*"}}',
                                              initialfile = c("*.*"))))

#Get EXIF of image file:exifr command
#Information to be obtained:exiftoolargs option;
#Get camera model as an example
ExifData <- as.data.frame(t(exifr(OpenFile, exiftoolargs = NULL)))
V1
SourceFile /test.JPG
Model                              E-M5MarkII

#CSV output of acquired data to a working directory
write.csv(ExifData, "ExifData.csv")

I hope this makes your analysis a little easier !!

スポンサーリンク
価格および配送状況は変更される場合があります。購入時は商品ページをご確認ください。
当サイトに表示されている商品情報はAmazonから提供されたものであり、更新または削除される場合があります。
karada-goodはAmazonアソシエイトとして、適格販売により収入を得ています。