# install.packages("XQuartz")
# library(readr)
Impact_of_Remote_Work_on_Mental_Health <- read.csv("Impact_of_Remote_Work_on_Mental_Health.csv")
# View(Impact_of_Remote_Work_on_Mental_Health)
summary(Impact_of_Remote_Work_on_Mental_Health)
##  Employee_ID             Age        Gender            Job_Role        
##  Length:5000        Min.   :22   Length:5000        Length:5000       
##  Class :character   1st Qu.:31   Class :character   Class :character  
##  Mode  :character   Median :41   Mode  :character   Mode  :character  
##                     Mean   :41                                        
##                     3rd Qu.:51                                        
##                     Max.   :60                                        
##    Industry         Years_of_Experience Work_Location     
##  Length:5000        Min.   : 1.00       Length:5000       
##  Class :character   1st Qu.: 9.00       Class :character  
##  Mode  :character   Median :18.00       Mode  :character  
##                     Mean   :17.81                         
##                     3rd Qu.:26.00                         
##                     Max.   :35.00                         
##  Hours_Worked_Per_Week Number_of_Virtual_Meetings Work_Life_Balance_Rating
##  Min.   :20.00         Min.   : 0.000             Min.   :1.000           
##  1st Qu.:29.00         1st Qu.: 4.000             1st Qu.:2.000           
##  Median :40.00         Median : 8.000             Median :3.000           
##  Mean   :39.61         Mean   : 7.559             Mean   :2.984           
##  3rd Qu.:50.00         3rd Qu.:12.000             3rd Qu.:4.000           
##  Max.   :60.00         Max.   :15.000             Max.   :5.000           
##  Stress_Level       Mental_Health_Condition Access_to_Mental_Health_Resources
##  Length:5000        Length:5000             Length:5000                      
##  Class :character   Class :character        Class :character                 
##  Mode  :character   Mode  :character        Mode  :character                 
##                                                                              
##                                                                              
##                                                                              
##  Productivity_Change Social_Isolation_Rating Satisfaction_with_Remote_Work
##  Length:5000         Min.   :1.000           Length:5000                  
##  Class :character    1st Qu.:2.000           Class :character             
##  Mode  :character    Median :3.000           Mode  :character             
##                      Mean   :2.994                                        
##                      3rd Qu.:4.000                                        
##                      Max.   :5.000                                        
##  Company_Support_for_Remote_Work Physical_Activity  Sleep_Quality     
##  Min.   :1.000                   Length:5000        Length:5000       
##  1st Qu.:2.000                   Class :character   Class :character  
##  Median :3.000                   Mode  :character   Mode  :character  
##  Mean   :3.008                                                        
##  3rd Qu.:4.000                                                        
##  Max.   :5.000                                                        
##     Region         
##  Length:5000       
##  Class :character  
##  Mode  :character  
##                    
##                    
## 

Questions

# Which job role has the highest productivity?
# Which work location has the highest stress level?
# Which industry has the lowest number of virtual meetings?
# Which gender has the highest number of virtual meetings?