1、首先，给出一组复杂的随机数据：
A = Table[Abs[Sin[x] RandomReal[{0.9, 1}]], {x, 0, 2 Pi, Pi/10^4}]
2、这组数据很不规则，可以看看舍选艳对应的散点图：
ListPlot[A]
3、看看0.0在A里面出现的次数：
Count[A, 0.00]
4、统计一下，大于-0.2而小于0.2的数字的个数披巨：
Count[A, u_ /; -0.2 < u < 0.2]
5、大于0.8或小于-0.8的数字的个数孝段：
Count[A, u_ /; u > 0.8 || u < -0.8]
6、直方图：
Histogram[A, Automatic, "Count"]
