WOLFRAM

Wolfram 语言与系统参考资料中心

可视化直方图的最大高度

获取并可视化标准普尔500指数五年每日收益的最大值.

    
Wolfram Language code: returns = FinancialData["SP500", "Return", {DatePlus[Date[], {-5, "Year"}], Date[]}, "Value"]; μ = Mean[returns]; h = Histogram[returns, 300, "PDF"];
Wolfram Language code: {bins, heights} = HistogramList[returns, 300, "PDF"]; maxFreq = Max[heights]; Histogram[returns, {bins}, heights&, Epilog -> {{Thick, Darker[Green], Line[{{μ, 0}, {μ, maxFreq + 2}}]}}]