GRAFİK OLUŞTURMA VE ÇOKLU ZAMAN SERİSİ GRAFİĞİ

   

#Yağış miktarı grafiği oluşturalım:)

# Veri noktalarını bir R vektörü biçiminde alıyoruz.
yagismiktari <- c(799,1174.8,865.1,1334.6,635.4,918.5,685.5,998.6,784.2,985,882.8,1071)

# Bir zaman serisi nesnesine dönüştürür.
yagismiktari.timeseries <- ts(yagismiktari,start = c(2012,1),frequency = 12)

# Zaman kaynakları verilerini yazdır.
print(yagismiktari.timeseries)

# Grafik dosyamıza bir isim veriyoruz.
png(file = "yagismiktari.png")

# Zaman serisinin grafiğini çizdiriyoruz.
plot(yagismiktari.timeseries)

# Dosyamızı kaydedelim.
dev.off()

 Çalıştırdığımızda ;

Grafiğimiz oluşmuş oluyor :)



Burada yine yıllık yağış miktarlarının grafiğini oluşturacağız.
Ama iki veriyle  yağış miktarlarını karşılaştırarak yapacağız grafiği.

#Öncelikle veri noktalarımızı bir R vektörü şeklinde alıyoruz.
yagismiktari1 <- c(799,1174.8,865.1,1334.6,635.4,918.5,685.5,998.6,784.2,985,882.8,1071)
yagismiktari2 <- 
           c(655,1306.9,1323.4,1172.2,562.2,824,822.4,1265.5,799.6,1105.6,1106.7,1337.8)

# Bunları bir matrise dönüştürüyoruz.
combined.yagismiktari <-  matrix(c(yagismiktari1,yagismiktari2),nrow = 12)

# Bunları bir zaman serisi nesnesine dönüştürür.
yagismiktari.timeseries <- ts(combined.yagismiktari,start = c(2012,1),frequency = 12)

# Zaman çizelgesi verilerimiz yazdırıyor.
print(yagismiktari.timeseries)

# Grafik dosyamıza bir isim veriyoruz.
png(file = "yagismiktari_combined.png")

# Zaman serilerimizin grafiğini çizdiriyoruz.
plot(yagismiktari.timeseries, main = "Multiple Time Series")

# Ve son olarak dosyamızı kaydediyoruz.
dev.off()

Çalıştırdığımızda;
 Yagismiktari dosyamızda çift zaman serili grafiğimiz oluşmuş oluyor.

KAYNAKLAR:

https://www.rstudio.com/

http://www.renanreis.com/r-yaziliminda-temel-islemler.html

https://www.tutorialspoint.com/r/r_time_series_analysis.htm