アメリカの連邦準備銀行のプライムレート
アメリカの連邦準備銀行の経済データ(FRED)からの銀行の最優遇貸出金利の時系列をプロットする．
In[1]:=
fred = ServiceConnect["FederalReserveEconomicData"]Out[1]=
In[2]:=
prime = fred["SeriesData", "ID" -> "PRIME"]Out[2]=
In[3]:=
DateListStepPlot[prime,
PlotRange -> {{DateObject[{1990}], Today}, {0, 12}},
PlotTheme -> {"Scientific", "Wide"}, ImageSize -> 550]Out[3]=
