Skip to main content
deleted 106 characters in body
Source Link

This shape is just the CDF of Wigner's semicircle law

Assuming[{-1 < x < 1},
  f[x_] = CDF[WignerSemicircleDistribution[1], x] // Refine
  ];
g = InverseFunction[f[#] &];
LogPlot[g[1 - x], {x, 0, 0.5}, Filling -> Axis, PlotRange -> All]

enter image description here

enter image description herenotebook

Answered in https://math.stackexchange.com/a/4187243/998

This shape is just the CDF of Wigner's semicircle law

Assuming[{-1 < x < 1},
  f[x_] = CDF[WignerSemicircleDistribution[1], x] // Refine
  ];
g = InverseFunction[f[#] &];
LogPlot[g[1 - x], {x, 0, 0.5}, Filling -> Axis, PlotRange -> All]

enter image description here

Answered in https://math.stackexchange.com/a/4187243/998

This shape is just the CDF of Wigner's semicircle law

enter image description here

notebook

Answered in https://math.stackexchange.com/a/4187243/998

Source Link

This shape is just the CDF of Wigner's semicircle law

Assuming[{-1 < x < 1},
  f[x_] = CDF[WignerSemicircleDistribution[1], x] // Refine
  ];
g = InverseFunction[f[#] &];
LogPlot[g[1 - x], {x, 0, 0.5}, Filling -> Axis, PlotRange -> All]

enter image description here

Answered in https://math.stackexchange.com/a/4187243/998