### SET UP THE CODE ####
# install package.
  # This only needs to be run once on your compter per package, ever. This means you don't need to run this ever again after todays workshop.
install.packages("tidyverse")

# load package (telling R you need this package).
  # This needs to be run every single time you open a new R session where you will need to use the tidyverse package.
library(tidyverse)

# set working directory
setwd("C:/Desktop")

# read in the .csv file
kelp_dataset=read.csv("kelp_dataset.csv")

# look at the data
View(kelp_dataset)

# see summary (mean, min, max, and other) of all your variables 
summary(kelp_dataset)

#### FORMAT THE DATA ####
# data looks goods for today. We did not do this but see other workshops!! 

#### DATA ANALYSIS ####
# calculate the mean wet weight of all the kelps in the kelp_dataset 
mean(kelp_dataset$KelpWetWeight)

# run a corelation test between kelp weight and length 
cor.test(kelp_dataset$KelpWetWeight, kelp_dataset$KelpThallusLength) 

# plot the weigth and length 
plot(kelp_dataset$KelpWetWeight, kelp_dataset$KelpThallusLength)