打開RStudio
創(chuàng)建腳本
#install.package 只要安裝一次就行
install.packages("siar")
#每次運行siar需要進(jìn)行l(wèi)ibrary
library(siar)
打好代碼后哥力，點擊Run運行光標(biāo)所在行迎卤，或者用快捷鍵Ctrl+Enter
確認(rèn)siar包安裝完成
運行siar包
library(siar)
#創(chuàng)建空間，放在自己指定的目錄里兰英，并將所需數(shù)據(jù)放在該目錄下
setwd("D://SIAR")
#讀取數(shù)據(jù)
data<-read.csv("table1.csv",header = T)
sources<-read.csv("table2.csv",header = T)
#構(gòu)建模型
model1<-siarmcmcdirichletv4(data,sources)
#繪圖
siarhistograms(model1)
運行最后一代碼后撇叁，選擇組
選擇單獨顯示來源或全部來源
顯示圖片
復(fù)制到剪貼板
復(fù)制選項
打開PPT，粘貼
右擊編輯圖片
轉(zhuǎn)對象
取消組合
任意調(diào)整圖表
