If you need formality:
p[x_] := DiracDelta[x - mu]; expValue = Integrate[xp[x] , {x, -Infinity, Infinity}] stdDev = Sqrt[Integrate[(x - expValue)^2 p[x] , {x, -Infinity, Infinity}]] (* -> ConditionalExpression[mu, mu \[Element] Reals] -> ConditionalExpression[0, mu \[Element] Reals] *)
Edit
Or better, using Mathematica ProbabilityDistribution[] :
dist = ProbabilityDistribution[DiracDelta[x - mu], {x, -Infinity, Infinity}]; {Mean[dist], StandardDeviation[dist]} (* -> { mu, ConditionalExpression[0, mu \[Element] Reals]} *)
Dr. belisarius
source share