Assignment 6

## Warning: package 'dplyr' was built under R version 4.3.3

## 
## 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

## Warning: package 'plotly' was built under R version 4.3.3

## Loading required package: ggplot2

## Warning: package 'ggplot2' was built under R version 4.3.3

## 
## 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

## Warning: package 'readr' was built under R version 4.3.3

## Rows: 26 Columns: 3

## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): Company, job_type
## dbl (1): layoffs
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

Interpretation:

The Sankey diagram shows that software engineering roles were the most impacted across all organizations, resulting in the largest layoffs at Amazon and Meta. There were also notable cuts in non-technical areas such as marketing, customer success, and HR & Talent Sourcing. In contrast, fewer layoffs occurred in specialized positions like PR & Communications, UX/Design, and QA, indicating a broad yet targeted reorganization of functions within the tech industry.