Deep fields: pixel sorting Hubble images of deep space

[ahmed (Ahmed Elbanna)]

I think this post/function from @Erik Mahieu may interest you:

Pixel sorting according to different methods

Pixel sorting according to different methods

Inspired by a tweet from Wolfram Research and their link to this, I made this Manipulate. Hopefully it will inspire others to do better? Manipulate[ Image[RotateLeft[#, t] & /@ RotateLeft[SortBy[ImageData[im], fun[#[[All, c]]] &], s]], {{fun, First, "function applied"}, {First, Last, Mean, Median, Norm, Normalize, StandardDeviation, Total, Accumulate, Flatten@Gather[#] &, Sort, Commonest, Differences, TrimmedMean[#, .35] & -> "trimmedMean", TakeLargest[#, 1] & -> "takel…