diff --git a/Statistical-Monero-Logo/README.md b/Statistical-Monero-Logo/README.md index b004cbb..9025e2b 100644 --- a/Statistical-Monero-Logo/README.md +++ b/Statistical-Monero-Logo/README.md @@ -1,9 +1,11 @@ # Statistical Monero Logo These files create an animated gif that visually builds a Monero logo from random draws of a probability density function. +![Statistical Monero Logo](Statistical-Monero-Logo.gif) + The probability density function was constructed from the coordinates embedded in this SVG file: -https://raw.githubusercontent.com/fluffypony/monero-logo-artefacts/master/Logo Subsequent%20Tweaks/monero%20file.svg +https://raw.githubusercontent.com/fluffypony/monero-logo-artefacts/master/Logo%20Subsequent%20Tweaks/monero%20file.svg To create the gif, first run data-construction.R . This may take days to complete since over 50 million observations have to be drawn from a cumulative distribution function that is created through numerical integration. Then run gif-construction.R . For best results, it is recommended to install Cairo, which is software separate from R. Read gif-construction.R for more details. diff --git a/Statistical-Monero-Logo/data-construction.R b/Statistical-Monero-Logo/data-construction.R index 1f8e974..904e7ad 100644 --- a/Statistical-Monero-Logo/data-construction.R +++ b/Statistical-Monero-Logo/data-construction.R @@ -47,8 +47,6 @@ M.outline <- M.outline[(-1) * (which.min(M.outline$x) + 1):(which.max(M.outline$ M.outline <- M.outline[(-1) * c(1, 9), ] -M.outline <- M.outline - M.outline$x <- M.outline$x - min(M.outline$x) M.outline$x <- M.outline$x / max(M.outline$x) @@ -88,7 +86,7 @@ for ( i in 3:48) { save(generated.logo.observations, file = "generated-logo-observations.Rdata") # When i = 48, y will be length 57280991 - print(paste(i, length(generated.logo.observations) ) + print(paste(i, length(generated.logo.observations) )) }