diff --git a/artwork.org b/artwork.org index 60409cb..3e18a5f 100644 --- a/artwork.org +++ b/artwork.org @@ -249,6 +249,13 @@ PIXEL-WIDTH () max=3508.00 :end: +#+begin_src lisp + (format nil "Total (2D) Digital Artworks: ~A" (- 375 341)) +#+end_src + +#+RESULTS: +: Total (2D) Digital Artworks: 34 + ** <2023-03-27 Mon> Summary: Pixel Height #+begin_src lisp :session :results drawer @@ -289,13 +296,11 @@ paper", 1 (0%) x "Staples on paper", database. See [[published_summary][Published Summary]] below for the artwork creation date. #+name: created_at_summary -#+begin_src lisp :session :results output -r +#+begin_src lisp :session :results drawer (lisp-stat:summarize-column '*artworks-df*:created-at) #+end_src #+RESULTS: created_at_summary - -#+RESULTS: :results: 338 (90%) x "2022-04-11", 2 (1%) x "2022-04-11 00:00:00.000000Z", 1 (0%) x "2022-06-25 20:47:51.282515", 1 (0%) x "2022-07-19 02:21:20.722981Z", 1 (0%) x @@ -553,10 +558,64 @@ NIL #+RESULTS: [[file:output/art-width-height-2023-03-21.html]] -*** <2023-03-27 Mon> A Line of Lines has wrong dimensions +*** <2023-03-27 Mon> Note: A Line of Lines has wrong dimensions They should be =21 x 14.8 cm= and not =210 x 148 cm=. *I have updated the dimensions on the live site.* I did not notice it until I saw the chart. Basically, the decimal point is was shifted one place to the right. [[file:output/art-width-height-2023-03-21.png]] + +** <2023-03-27 Mon> Plot: Pixel-Width vs Pixel-Height (digital only) + +#+begin_src lisp :session :results file + (defparameter *artworks-px-w-h-df* + (lisp-stat:df-remove-duplicates + (lisp-stat:drop-missing + (lisp-stat:select *artworks-df* t '(pixel-width pixel-height)))) + "A data-frame containing all the `PIXEL-WIDTH' and `PIXEL-HEIGHT' values. + All the missing/null values have been removed from the list.") + + (vega:defplot px-width-px-height + `(:title "Art: Pixel-Width vs Pixel-Height (2D Digital)" + :description + "Comparison between the pixel width and height dimensions of digital artworks." + :width 400 + :height 400 + :mark :circle + :data ,*artworks-px-w-h-df* ; ,*artworks-df* + :selection (:grid (:type :interval :bind :scales)) + :encoding (:x (:field :pixel-width :title "Pixel-Width (px)" :type :quantitative) + :y (:field :pixel-height :title "Pixel Height (px)" :type :quantitative) + :tooltip (:field :title :type :nominative) + :color (:field :PIXEL-WIDTH :legend :null)))) + + (vega:write-html width-height "output/art-px-width-px-height-2023-03-21.html") +#+end_src + +#+RESULTS: +[[file:output/art-px-width-px-height-2023-03-21.html]] + +#+begin_src lisp :session :results output raw + (lisp-stat:df-print + (lisp-stat:df-remove-duplicates + (lisp-stat:drop-missing + (lisp-stat:select *artworks-df* t '(pixel-width pixel-height)) + (lambda (x) (eql :na x))))) +#+end_src + +#+RESULTS: +| PIXEL-WIDTH | PIXEL-HEIGHT | +|-------------+--------------| +| 3142.0d0 | 4722 | +| 2480.0d0 | 3508 | +| 3508.0d0 | 2480 | +| 3456.0d0 | 4608 | +| 3402.0d0 | 4536 | + +There is a lot of duplicated sizes in these columns. The chart *had* loads of dots +resting on top of each other so you only see five at any one point. I've removed +all the rows with missing values and the duplicates to help show how thirty-four +(2D) digital images only show-up as five images in the chart. + +** TODO <2023-03-27 Mon> Compare landscape to portrait