Analysis

#Load Libraries

Here I load libraries

library(dplyr)         # for manipulating data

## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

library(ggplot2)       # for making graphs
library(knitr)         # for nicer table formatting
library(summarytools)  # for frequency distribution tables & summary statistics

## Registered S3 method overwritten by 'pryr':
##   method      from
##   print.bytes Rcpp

## For best results, restart R session and update pander using devtools:: or remotes::install_github('rapporter/pander')

library(descr)         # for summary statistics

## 
## Attaching package: 'descr'

## The following objects are masked from 'package:summarytools':
## 
##     descr, freq

#Load Data Sets

Im loading data here

load("Datasets/OPM94.RData")

#histogram

library(ggplot2)
ggplot(data = opm94, aes(x = sal)) + geom_histogram()

## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

## Warning: Removed 5 rows containing non-finite values (stat_bin).