My First Quarto Document

Author

K M

My first report

A first example of generating a report using R, RStudio, and Quarto. The goal of this report is to:

  • Generate a simple report
  • Include some R code
  • Include a figure generated by R
 5 + 6
[1] 11

GISS Temperature Data

GISS Temperature Data from 1881 to 2011.

giss = read.csv("~/Desktop/GEOG 5680/Data/giss_temp.csv")
summary(giss)
      Year          Month          DecDate        TempAnom        
 Min.   :1881   Min.   : 1.00   Min.   :1881   Min.   :-0.860000  
 1st Qu.:1913   1st Qu.: 3.75   1st Qu.:1914   1st Qu.:-0.210000  
 Median :1946   Median : 6.50   Median :1946   Median :-0.050000  
 Mean   :1946   Mean   : 6.50   Mean   :1946   Mean   :-0.009427  
 3rd Qu.:1979   3rd Qu.: 9.25   3rd Qu.:1979   3rd Qu.: 0.150000  
 Max.   :2011   Max.   :12.00   Max.   :2012   Max.   : 0.880000

Creating Vectors:

  • Averaging GISS Temperature Data from 1881 to 2011
  • Combining each year’s months data into each individual year
annualTemp = tapply(giss$TempAnom, giss$Year, mean)
years = unique(giss$Year)

Creating a Histogram of all Temperature Anomalies

hist(giss$TempAnom, breaks = 20)

Creating a Line Plot of Averaged GISS Temperatures

plot(years, annualTemp, type = 'l', lwd = 2, col = 2,
     xlab = "Years", ylab = "Temp Anom")
abline(h=0, lty=2)