dataquest-latihan1.R

# loading packages
library(readr)

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

library(ggplot2)

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

# loading the monster_jobs dataset
monster_jobs_clean <- read_csv("monster_jobs_clean.csv")

## Rows: 86 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): job_type, payment_period
## dbl (3): job_id, salary_min, salary_max
## 
## ℹ 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.

View(monster_jobs_clean)

# plotting job_id vs salary_min
ggplot(monster_jobs_clean, aes(x=job_id, y=salary_min, color=job_type)) + geom_point() + labs(title="Job ID vs Minimum Salary", x="Job ID", y="Minimum Salary", color="Job Type")