faramea <- read.csv(‘faramea.csv’, header = TRUE)