Commit 0b19336f authored by Johannes Bleher's avatar Johannes Bleher
Browse files

Picture now includes the AIDAHO stars

parent 108049e0

00_data/Santa Jung 2.jpg

0 → 100644
+338 KiB
Loading image diff...

00_data/Santa Jung 2_small.jpg

0 → 100644
+257 KiB
Loading image diff...

00_data/point_cloud.csv

+105000 −105000

File changed.

Preview size limit exceeded, changes collapsed.

01_code/231211_JB_data_generation.R

+4 −4
Original line number Diff line number Diff line
@@ -4,7 +4,7 @@ 
rm(list=ls())



library(imager)

img <- load.image(file='00_data/RJ_santa.jpeg')

img <- load.image(file='00_data/Santa Jung 2.jpg')





img.gray <- grayscale(img, method = "Luma", drop = TRUE)
@@ -23,10 +23,10 @@ out$x <- nrow(raster)-out$x+1 


out.idx1 <- which(out$z %in% c("#000000","#333333"))

smpl.idx1 <- sample(out.idx1,size=70000,replace=FALSE)

out.idx2 <- which(out$z %in% c("#666666"

                               ,"#999999"))

out.idx2 <- which(out$z %in% c("#404040"

                               ,"#808080"))

smpl.idx2 <- sample(out.idx2,size=30000,replace=FALSE)

out.idx3 <- which(out$z %in% c("#CCCCCC"))

out.idx3 <- which(out$z %in% c("#BFBFBF"))

smpl.idx3 <- sample(out.idx3,size=5000,replace=FALSE)



plot(out[c(smpl.idx1,

README.md

+1 −1
Original line number Diff line number Diff line 
# The AIDAHO Santa has lost his way!

![](00_data/RJ_santa.jpeg "AIDAHO Santa"){: .images width="25%" align="left" padding="25px"}

![](00_data/Santa Jung 2.jpg "AIDAHO Santa"){: .images width="25%" align="left" padding="25px"}



In Hohenheim, where data gleams,    

Underneath the winter moon's beams,