全文鏈接：http://tecdat.cn/?p=7994

最近我們被客戶要求撰寫關(guān)于繪制動態(tài)統(tǒng)計圖的研究報告，包括一些圖形和統(tǒng)計輸出。

nations.csv?來自世界銀行指標(biāo)的數(shù)據(jù)

使用的數(shù)據(jù)

• warming.csv?有關(guān)1880年至2017年全球年平均溫度 。

• year

• value?全球平均溫度，與1900-2000年的平均溫度相比。

• ? ?`simulations.csv`美國國家航空航天局（NASA）對歷史溫度的模擬數(shù)據(jù)，估計了自然和人為因素對氣候的影響， 包含以下變量：

• year

• type?自然還是人為影響因素

• value?來自模擬的全球平均溫度，相對于1990-2000年的平均模擬值。

• ? ?`charts`?空文件夾，我們將在其中保存要制作動畫的各個幀。

配置

啟動RStudio，創(chuàng)建一個新的RScript，然后通過選擇將工作目錄設(shè)置為包含下載數(shù)據(jù)的文件夾Session>Set Working Directory>To Source File Location。

安裝

加載我們今天將使用的軟件包

#?加載需要的軟件包library(readr)library(ggplot2)library(dplyr)

氣泡圖

我們制作了以下圖表，顯示了2016年世界各國的人均GDP，出生時的期望壽命和人口：

點擊標(biāo)題查閱往期內(nèi)容

動態(tài)圖可視化：如何、創(chuàng)建具有精美動畫圖

左右滑動查看更多

01

02

03

04

這是生成該圖表的代碼：

#?讀取數(shù)據(jù)nations?<-?read_csv("nations.csv")#?過濾?2016?年的數(shù)據(jù)?nations2016?<-?nations?%>% ??filter(year?==?2016)#?繪制泡泡圖ggplot(nations2016,?aes(x?=?gdp_percap,?y?=?life_expect))?+ ??xlab("GDP?per?capita")?+ ??ylab("Life?expectancy?at?birth")?+ ??theme_minimal(base_size?=?12,?base_family?=?"Georgia")?+ ??geom_point(aes(size?=?population,?color?=?region),?alpha?=?0.7)?+ ??scale_size_area(guide?=?FALSE,?max_size?=?15)?+ ??scale_x_continuous(labels?=?dollar)?+ ??stat_smooth(formula?=?y?~?log10(x),?se?=?FALSE,?size?=?0.5,?color?=?"black",?linetype="dotted")?+ ??scale_color_brewer(name?=?"",?palette?=?"Set2")?+ ??theme(legend.position=c(0.8,0.4))

• ? ?`scale_size_area`確保圓的大小根據(jù)人口數(shù)據(jù)按其面積縮放， 。
• ? ?`labels ?`將X軸標(biāo)簽的格式。
• ? ?`stat_smooth`的工作方式類似，`geom_smooth `允許 使用`formula`來指定用于擬合數(shù)據(jù)趨勢線的曲線類型，此處為對數(shù)曲線。

現(xiàn)在，我們將生成1990年至2016年圖表的動畫。這是代碼：

現(xiàn)在，Viewer通過運行以下命令將其顯示在面板中：

animate(nations_plot)

代碼的工作方式

• transition_time此功能通過來對數(shù)據(jù)進行動畫處理year，僅顯示與任何一個時間點相關(guān)的數(shù)據(jù)。除了每年生成一個幀外，它還生成中間幀以提供平滑的動畫。

• "{frame_time}"在ggtitle函數(shù)內(nèi)使用會在每個幀上放置一個標(biāo)題，并帶有transition_time函數(shù)中變量此處的相應(yīng)值year。

• ease_aes控制動畫的進行方式。

• enter_fade?，exit_fade這些功能控制動畫中數(shù)據(jù)點出現(xiàn)或消失的行為。您也可以使用enter_shrink和exit_shrink。

另存為GIF和視頻

現(xiàn)在，我們可以將動畫另存為GIF或視頻

您可以使用選項width和height設(shè)置動畫的尺寸（以像素為單位）。fps設(shè)置GIF的幀速率，以每秒幀數(shù)為單位。

要制作視頻，您需要代碼renderer = ffmpeg_renderer()，這需要在系統(tǒng)上安裝FFmpeg。上面的視頻代碼還將寬高比設(shè)置為16：9 。

這是GIF：

點擊文末?“閱讀原文”

獲取全文完整資料。

本文選自《r語言繪制動態(tài)統(tǒng)計圖：繪制世界各國的人均GDP，出生時的預(yù)期壽命和人口氣泡圖動畫動態(tài)gif圖》。

點擊標(biāo)題查閱往期內(nèi)容

R語言對布豐投針（蒲豐投針）實驗進行模擬和動態(tài)可視化生成GIF動畫
R語言在BRFSS數(shù)據(jù)中可視化分析探索糖尿病的影響因素
數(shù)據(jù)可視化分析案例：探索BRFSS電話調(diào)查數(shù)據(jù)
R語言隨機森林RandomForest、邏輯回歸Logisitc預(yù)測心臟病數(shù)據(jù)和可視化分析
R語言計算資本資產(chǎn)定價模型(CAPM)中的Beta值和可視化
R語言主成分分析（PCA）葡萄酒可視化：主成分得分散點圖和載荷圖
R語言時變向量自回歸（TV-VAR）模型分析時間序列和可視化
R語言樣條曲線、決策樹、Adaboost、梯度提升(GBM)算法進行回歸、分類和動態(tài)可視化
R語言用主成分PCA、?邏輯回歸、決策樹、隨機森林分析心臟病數(shù)據(jù)并高維可視化
R語言對布豐投針（蒲豐投針）實驗進行模擬和動態(tài)可視化生成GIF動畫
R語言信用風(fēng)險回歸模型中交互作用的分析及可視化
R語言生存分析可視化分析
R語言線性回歸和時間序列分析北京房價影響因素可視化案例
R語言用溫度對城市層次聚類、kmean聚類、主成分分析和Voronoi圖可視化
R語言動態(tài)可視化：繪制歷史全球平均溫度的累積動態(tài)折線圖動畫gif視頻圖
R語言動態(tài)圖可視化：如何、創(chuàng)建具有精美動畫的圖
R語言中生存分析模型的時間依賴性ROC曲線可視化