using PlotlyLight, Distributions, Statistics
function simulateCLT(n, s, dist=Uniform())
μ = mean(dist)
σ = sqrt(var(dist))
x = rand(dist, n, s)
z = 1/sqrt(n)*sum( (x .- μ)./σ, dims=1)
end
dist = Uniform()
x = range(-2.5, 2.5, length=200)
N = [1, 2, 4, 16, 256]
S = 10_000
Fn = [let z=simulateCLT(n,S, dist);
x->mean(z .<= x)
end for n in N];