Created by Thomas Huet, Jose M Pozo, Craig Alexander
The iconr R package purpose is to contribute to cross-cultural comparison of iconography through a greater normalization of quantitative analysis. The package stable version deals with composition analysis[^1], the package development version deals with both composition and geometric morphometric.
The R package iconr is grounded in graph theory, spatial analysis (composition analysis), and shape analysis (geometric morphometric) to offer concepts, measurments and functions for modeling Prehistoric iconography and preparing for further analysis (clustering, typology tree, Harris diagram, etc.). The theoretical background is as follows: * Some objects (eg, pottery, rock panels) have a decoration; * A decoration is composed of graphical units (GUs); * GUs can be modeled as POINTS or drawn as LINES or POLYGONS (2D); * Shape analysis can measures the similarities between two GUs (eg. Procrustes distance); * GUs are considered as nodes; * Nodes have neighbourhood relations one with another depending on their spatial proximities; * A decoration is considered as a spatial graph, modeled with graph theory and analysed with network and spatial analysis;
Spatial, network and shape indices can be calculated for every nodes and every decoration (i.e. graph). Each decoration can be compared to another decoration on the basis of local or global indices (e.g. degree and degree distribution) and on the basis of their shape indices;
As favored GIS entry, GIS indices (x and y dimensions) can also be used.
See how to contribute to the next package release; how to report an issue using the issue template.
The iconr v. 0.1.0 stable version can be installed from the CRAN. It allows GUs composition analysis)
install.packages("iconr")
The v. 0.1.0 allows the analysis of compositions
Photograph of Solana de Cabañas (Extremadura, Spain) Late Bronze Age stele[^2] [1]. Graphical units (GUs) drawing [2]. Each GU is recorded with a vertex (POINT) [3], and each contiguous vertex (Voronoi cell) is linked with an edge [4, 5].
See the package vignette
The iconr v. 0.1.0 functions' descriptions and examples are available on this website.
The package as a sample of 5 decorations[^3]:
idf site decor img 1 Cerro Muriano Cerro Muriano 1 Cerro_Muriano.Cerro_Muriano_1.jpg 2 Torrejon Rubio Torrejon Rubio 1 Torrejon_Rubio.Torrejon_Rubio_1.jpg 3 Brozas Brozas Brozas.Brozas.jpg 4 Zarza de Montanchez Zarza De Montanchez Zarza_de_Montanchez.Zarza_De_Montanchez.jpg 5 Ibahernando Ibahernando Ibahernando.Ibahernando.jpg 1 2 3 4 5 Cerro Muriano, stele 1 Torrejon Rubio, stele 1 Brozas stele Zarza de Montanchez, stele Ibahernando steleSet data folder, select the decoration to be plotted, read files of nodes, edges, and images and plot a decoration
dataDir <- system.file("extdata", package = "iconr")
site <- "Brozas" ; decor <- "Brozas"
nds.df <- read_nds(site, decor, dataDir)
eds.df <- read_eds(site, decor, dataDir)
imgs <- read.table(paste0(dataDir, "/imgs.tsv"),
sep="\t", stringsAsFactors = FALSE)
plot_dec_grph(nds.df, eds.df, imgs,
site, decor,
dir = dataDir,
lbl.size = 0.4,
nd.var = "type")
Common edges between pairs of decorations allow to measure the similarities in their composition. Common edges are more accurate than common nodes (see also, nds_compar() and eds_compar()) For example, we plot common edges shared by the three first decorations of the training dataset with the plot_compar() function
imgs <- read.table(system.file("extdata", "imgs.tsv", package = "iconr"),
sep="\t", stringsAsFactors = FALSE)
nodes <- read.table(system.file("extdata", "nodes.tsv", package = "iconr"),
sep="\t", stringsAsFactors = FALSE)
edges <- read.table(system.file("extdata", "edges.tsv", package = "iconr"),
sep="\t", stringsAsFactors = FALSE)
lgrph <- list_dec(imgs, nodes, edges)
g.compar <- list_compar(lgrph, nd.var="type")
plot_compar(g.compar, c(1, 2, 3),
focus = "edges",
nd.size = c(0.5, 1.5),
ed.width = c(1, 2.5),
dir = dataDir,
img.format = "png")
The same result, but in the form of a coincidence matrix, can be obtained with the function same_elements()
Comparisons between sets can be based on common edges, which take into account the common combination of two nodes with their edge type, and common nodes, which take into account only the presence of common nodes
In this example, in both groupings, the Brozas stela (decoration 3) and the Ibahernando stela (decoration 5) have the highest proximities (i.e. the lowest Euclidean distance)
Use the canonical form to cite the package in R (citation("iconr")
):
@Manual{Huet21pckg,
title = {iconr: Graphical and Spatial Analysis for Prehistoric Iconography},
author = {Thomas Huet and Jose Pozo},
year = {2021},
note = {R package version 0.1.0},
url = {https://CRAN.R-project.org/package=iconr},
}
The iconr v. 0.1.0 package has also been published in the Journal of Open Source Software under this BibTex reference:
@article{Huet21joss,
doi = {10.21105/joss.03191},
url = {https://doi.org/10.21105/joss.03191},
year = {2021},
publisher = {The Open Journal},
volume = {6},
number = {61},
pages = {3191},
author = {Thomas Huet and Jose M. Pozo and Craig Alexander},
title = {Analysis of Prehistoric Iconography with the R package iconr},
journal = {Journal of Open Source Software}
}
The iconr latest version, or development version v. 0.1.1, deals with both GUs composition and GUs shapes (geometric morphometric). Currently it takes in charge POLYGON geometries to perform Geometric Morphometry measurements (GMM). This development version can be downloaded from GitHub
devtools::install_github("zoometh/iconr")
The iconr v. 0.1.1 functions are named morph_*
(morphology) and conv_*
(conversions). Find their documentation directly on R (eg, ?morph_nds_compar
). They are performed with the R package Momocs
flowchart LR
T[User entry]:::iconRusr ---> A[(Postgres<br>DB)];
T ---> Q[[GIS]];
T ---> R((Geo<br>JSON));
A ---> B{{"conv_pg_to_shp()"}}:::iconRpkg;
B ---> C((SHP));
Q ---> C;
R ---> S{{"conv_geojson_to_wkt()"}}:::iconRpkg;
S ---> E((WKT));
C ---> D{{"conv_shp_to_wkt()"}}:::iconRpkg;
D ---> E;
E ---> F{{"conv_wkt_to_jpg()"}}:::iconRpkg;
F ---> G((JPG));
G ---> J{{"morph_nds_compar()"}}:::iconRpkg;
J ---> K[elemental<br>comparison];
J ---> U[User threshold]:::iconRusr;
U ---> H{{"morph_nds_group()"}}:::iconRpkg;
H ---> I[elemental<br>classification];
E ---> L{{"morph_resume()"}}:::iconRpkg;
L ---> P[dataset<br>description];
I ---> M[[elemental<br>distance<br>matrix]];
I ---> V[[elemental<br>distance<br>matrix]];
I ---> W[[...<br>...<br>...]];
M ---> N{{"morph_aggregate()"}}:::iconRpkg;
V ---> N;
W ---> N;
N ---> O[decor<br>classification];
classDef iconRpkg fill:#add8e6;
classDef iconRusr fill:#ffa500;
The sample dataset is composed on 5 decorated objects, belonging from 4 sites of the Near-East Pre-Pottery Neolithic:
Ain Ghazal, statue 2, cache 2 Ain Ghazal, statue 5, cache 2 Jericho, statue A, cache 195 Kfar Hahoresh, modelled skull Qarassa, bone wand
The graphical units 'faces' ('visages'), 'eyes' ('oeils'), and 'mouths' ('bouches') are drawn in a GIS
After downloading the PPNB dataset, set 'PPN' as the current working directory (setwd("*my_path*/PPN"")
), read and convert the 'nodes.csv' Well-Known Text geometries to JPG, and resume information
nodes <- read.csv2("*my_path*/PPN/_out/nodes.csv")
conv_wkt_to_jpg(nodes = nodes)
morph_resume(dataDir = "*my_path*/PPN",
nodes = nodes)
Stack the countours of 'faces' ('visages'), 'eyes' ('oeils'), and 'mouths' ('bouches')
conv_wkt_to_jpg(nodes = nodes)
nodes <- read.csv2("*my_path*/PPN/_out/nodes.csv")
conv_wkt_to_jpg(nodes = nodes)
morph_resume(dataDir = "*my_path*/PPN",
nodes = nodes)
iconr uses a hierarchical thesaurus (a tree-like structure) for GUs' typology. See for example the whole typological tree:
Or these different subtrees: geometric, figurative, zoomorphic, technomorphic, or anthropomorphic. Such a structure is known as a with controlled vocabulary with an identity between GU name and value must be unique (URL), such a structure should also be used for other fields than the GU type (eg, 'technique'). Multi-linguism equivalences -- starting with English --, metadata insertion (IPTC) and standardization of the vocabulary (Dublin Core, CIDOC-CRM) is needed.
The diachronic edge ->-
allows to register the superimposition. The next iconr will integrate an on-the-fly function allowing to create Harris matrices of GUs when such an edge exists. For example here, the Ibahernando stele shows a Latin writing overlaping a spear and a shield representations
The selection of a colored continuous range can be done from a POINT coordinates (x, y) overlapping this colored range (ie. a GU displayed in black on white background). The next iconr will integrate a function allowing to extract automatically the shape behind the POINTS
[^1]: Huet et al., (2021). Analysis of Prehistoric Iconography with the R package iconr. Journal of Open Source Software, 6(61), 3191, https://doi.org/10.21105/joss.03191 [^2]: credits Museo Arqueologico de Madrid [^3]: unless otherwise stated, the drawings of the steles are all from: Díaz-Guardamino Uribe, M. (2010). Las estelas decoradas en la prehistoria de la penı́nsula ibérica [PhD thesis, Universidad Complutense de Madrid, Servicio de Publicaciones]. https://eprints.ucm.es/11070/1/T32200.pdf
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.