Publications by Lauren Airey
Assignment 9
Question 1 ## ## Pearson's Chi-squared test ## ## data: table(hr$salary, hr$left) ## X-squared = 381.23, df = 2, p-value < 2.2e-16 There is a significant relationship between salary levels and employees leaving. Salary levels are linked to whether employees leave the company. Question 2 ## ## Pearson's Chi-squared test ## ## data: table(...
838 sym
Assignment 8
Question 1 ## ## Welch Two Sample t-test ## ## data: hr1$average_montly_hours by hr1$Employee_Status ## t = 7.5323, df = 4875.1, p-value = 5.907e-14 ## alternative hypothesis: true difference in means between group Left and group Stayed is not equal to 0 ## 95 percent confidence interval: ## 6.183384 10.534631 ## sample estimates: ## mean i...
1331 sym
Assignment 7
library(readr) library(ggplot2) hr <- read_csv('https://raw.githubusercontent.com/aiplanethub/Datasets/refs/heads/master/HR_comma_sep.csv') Correlation 1 ## ## Pearson's product-moment correlation ## ## data: hr$number_project and hr$average_montly_hours ## t = 56.219, df = 14997, p-value < 2.2e-16 ## alternative hypothesis: true correlation i...
910 sym R (1590 sym/9 pcs) 4 img
Assignment 6
#Histogram: Distribution of Employee Satisfaction most employees are satisfied (satisfication >.5) about 6% of employees are extremely dissatisfied (satisfaction<=.11) Box Plot: Last Evaluation Scores Median is around 0.64 50% of scores are around 0.44 and 0.82 The distribution is slightly skewed towards lower evaluation scores. #Comparative Bo...
1016 sym
Assignment 5
## ── 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.3 ✔ tidyr 1.3.1 ## ✔ purrr 1.0.2...
496 sym
Assignment4
1. Inner Join (3 points) Perform an inner join between the customers and orders datasets. Q1 <-inner_join(customers, orders) ## Joining with `by = join_by(customer_id)` a.How many rows are in the result? ## [1] 4 b. Why are some customers or orders not included in the result?. Some customers or orders are not included in the inner join result becau...
3929 sym Python (4852 sym/30 pcs)
Document
1. rename: Rename the “Film” column to “movie_title” and “Year” to “release_year”. Q1 <- movies %>% rename(movie_title = Film, release_year = Year) head(Q1) ## # A tibble: 6 × 8 ## movie_title Genre `Lead Studio` `Audience score %` Profitability ## <chr> <chr> <chr> ...
1392 sym Python (5970 sym/14 pcs)
Data 3210 - Assignment 2
Question 1 library(readr) HR_comma_sep <- read_csv("~/Documents/DATA 3210 2/HR_comma_sep.csv") ## Rows: 14999 Columns: 10 ## ── Column specification ──────────────────────────────────────────────────────── ## Delimiter: "," ## chr (2)...
600 sym R (489 sym/2 pcs)