Publications by Eli Adams and Trey Ordway
Assignment 9- Eli Adams and Trey Ordway
library(readr) library(plotly) ## Loading required package: ggplot2 ## ## Attaching package: 'plotly' ## The following object is masked from 'package:ggplot2': ## ## last_plot ## The following object is masked from 'package:stats': ## ## filter ## The following object is masked from 'package:graphics': ## ## layout library(dplyr) ##...
1027 sym R (3736 sym/29 pcs) 4 img
Assignment 8
library(readr) library(dplyr) ## ## 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(plotly) ## Loading required package: ggplot2 ## ## Attaching package: 'plotly' ## The follow...
1073 sym R (4099 sym/26 pcs)
Assignment 7: Eli Adams and Trey Ordway
library(readr) library(dplyr) ## ## 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) hr <- read_csv('https://raw.githubusercontent.com/aiplanethub/Datasets/refs/heads/m...
1385 sym R (3654 sym/23 pcs) 4 img
Assignment 6- Eli Adams and Trey Ordway
Task 1 Histogram: Distribution of Employee Satisfaction Create a histogram of the satisfaction_level variable. The title should reflect a key takeaway from the distribution. plot_ly(hr, x = ~satisfaction_level, type = "histogram") %>% layout(title = "About 50% of Employees Are Satisfied (Satisfaction > 0.7)", xaxis = list(title = "Satis...
1768 sym
Assignment 5-Eli Adams and Trey Ordway
Startup library(nycflights13) library(tidyverse) ## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ── ## ✔ dplyr 1.1.4 ✔ readr 2.1.5 ## ✔ forcats 1.0.0 ✔ stringr 1.5.1 ## ✔ ggplot2 3.5.1 ✔ tibble 3.2.1 ## ✔ lubridate 1.9...
540 sym R (2232 sym/15 pcs)
Document
Setup library(dplyr) ## ## 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 Dataset 1: Customers customers <- tibble( customer_id = c(1, 2, 3, 4, 5), name = c("Alice", "Bob", "Charl...
3451 sym R (4531 sym/48 pcs)
Assignment 3-Eli Adams and Trey Ordway
library(dplyr) ## ## 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(readr) # Load the movies dataset movies <- read_csv("https://gist.githubusercontent.com/tiangechen/b68782ef...
1125 sym R (6676 sym/19 pcs)