Question: DensityPlot and Sample

Why does this not work?

restart:
with(Statistics):

P := Sample(RandomVariable(Normal(10, 10)), 500):
X := RandomVariable(EmpiricalDistribution(P)):

DensityPlot(X);

Please Wait...