RosettaCodeData/Task/Modified-random-distribution/Julia/modified-random-distribution.jl
2024-10-16 18:07:41 -07:00

5 lines
211 B
Julia

using UnicodePlots
modifier(x) = (y = 2x - 1; y < 0 ? -y : y)
modrands(rands1, rands2) = [x for (i, x) in enumerate(rands1) if rands2[i] < modifier(x)]
histogram(modrands(rand(50000), rand(50000)), nbins = 20)