Birkhoff's aesthetic measure for images.

Description

Birkhoff's aesthetic measure is expressed as \(M=O/C\) Where M is the aesthetic measure, O is the order of the image and C is its complexity. For this function we use the entropy of the image as the order and the ratio of its uncompressed and compressed sizes (using the gzip compression algorithm) as its complexity.

Usage

1

Arguments

image

An image.

Value

A number representing the aesthetic measure of the image.

References

See: http://gilab.udg.edu/publ/container/publications/jaume-rigau/2007/Conceptualizing

Examples

1
2
3
4
5
6
library(CulturalAnalytics)
library(jpeg)
imgdir<-paste(system.file(package = "CulturalAnalytics"), "images", sep = "/")
imgs<-paste(imgdir, dir(path = imgdir, pattern = ".jpg"), sep = "/")
img<-readJPEG(imgs[1])
measure<-birkhoff(img)

Questions? Problems? Suggestions? or email at ian@mutexlabs.com.

Please suggest features or report bugs with the GitHub issue tracker.

All documentation is copyright its authors; we didn't write any of that.