Companies coming only of ANALYTICS INTERNS
c <- read_xlsx("Company.xlsx", col_names = T)
C_only_internship <- c %>% filter(Internship == 1 & Analytics == 1 & Job == 0) %>% arrange(Industry)
print(C_only_internship[,c(1,5)], n = nrow(C_only_internship))## # A tibble: 7 x 2
## `Company Name` Industry
## <chr> <chr>
## 1 Collins Aerospace Areospace
## 2 Celanese Automotive
## 3 AMD Electronic
## 4 IBM Electronic
## 5 Blue Cross Insurance
## 6 ISN Internet
## 7 Lennox ManufacturingCompanies coming for ANALYTICS recruits
C_analytics <- c %>% filter(Internship == 1 & Analytics == 1 & Job == 1) %>% arrange(`Company Name`)
print(C_analytics[,c(1,5)], n = nrow(C_analytics))## # A tibble: 32 x 2
## `Company Name` Industry
## <chr> <chr>
## 1 American Airlines Transportation
## 2 Apex Internet
## 3 BBVA Banking
## 4 BNSF Transportation
## 5 Capital One Banking
## 6 Citi Banking
## 7 CoreLogic Real Estate
## 8 Credera Consulting
## 9 Equinix Internet
## 10 Ethos Group Insurance
## 11 Ford Audio Video Dallas Construction
## 12 Fujitsu Telecommunication
## 13 Gallup Consulting
## 14 Headstorm Internet
## 15 Infosys Internet
## 16 Innosvative software engineering (ISE) Internet
## 17 J C Penny Retail
## 18 JP Morgan Banking
## 19 Lockheed Martin Areospace
## 20 NCR Electronic
## 21 PepsiCO CPG
## 22 Pioneer Natural Resource Energy
## 23 Prolim Global Consulting
## 24 Qentelli Internet
## 25 Raytheon Defense
## 26 rewardStyle Internet
## 27 RSM Consulting
## 28 Samsung Austin Manufacturing
## 29 Southern Glazer Retail
## 30 State Fram Insurance
## 31 USAA Insurance
## 32 Verizon TelecommunicationCompanies only for JOb and not interns
C_only_jobs <- c %>% filter(Internship == 0 & Job == 1) %>% arrange(`Company Name`)
print(C_only_jobs[,c(1,5)], n = nrow(C_only_jobs))## # A tibble: 30 x 2
## `Company Name` Industry
## <chr> <chr>
## 1 Alliant Systems Internet
## 2 Allstate Insurance Insurance
## 3 Amdocs Internet
## 4 Armeta Analytics Internet
## 5 Avigilon Other
## 6 Axtria Management Consulting
## 7 B.Braun Medical Manufacturing
## 8 Bank Of America Banking
## 9 Big Compass Internet
## 10 Capgemini Consulting
## 11 Cognizant Internet
## 12 COX Other
## 13 Dallas Area Rapid Transit Transportation
## 14 Data Ductus Networking
## 15 FDM Consulting
## 16 Hilton Hotels
## 17 Jabe business Services HealthCare
## 18 KBR Transportation
## 19 L&T Consulting
## 20 Lone Star Consulting
## 21 Marine Corps Defense
## 22 Medecision HealthCare
## 23 Medpace Research
## 24 N-Tier Internet
## 25 Navy Cyber Defense
## 26 Robin HealthCare
## 27 Sogeti Consulting
## 28 TCS Consulting
## 29 Wipro Consulting
## 30 Zyston Networkingcompanies to avoid
c_notanalytics <- c %>% filter(Analytics == 0) %>% arrange(`Company Name`)
print(c_notanalytics[,c(1,5)], n = nrow(c_notanalytics))## # A tibble: 33 x 2
## `Company Name` Industry
## <chr> <chr>
## 1 ABB inc Energy
## 2 Alliant Systems Internet
## 3 Ally Banking
## 4 APCON Networking
## 5 AT&T Telecommunication
## 6 Avigilon Other
## 7 Bank Of America Banking
## 8 Broadleaf Internet
## 9 Cisco Internet
## 10 COX Other
## 11 Emerson Manufacturing
## 12 Hilton Hotels
## 13 Industrial Networking Solutions Networking
## 14 KBR Transportation
## 15 L3Harris Defense
## 16 Marine Corps Defense
## 17 Maxim Electronic
## 18 Mentalix Internet
## 19 N-Tier Internet
## 20 Naval Surface Defense
## 21 Navy Cyber Defense
## 22 New York Air Brake Manufacturing
## 23 Paycom Internet
## 24 Rheem Manufacturing
## 25 Robin HealthCare
## 26 Samsung Semiconductors Electronic
## 27 Skyworks Electronic
## 28 TI Electronic
## 29 Tinker Air Defense
## 30 Toshiba Manufacturing
## 31 TriTech Internet
## 32 Williss Towers Other
## 33 Zyston NetworkingFull List
print(c, n = nrow(c))## # A tibble: 91 x 5
## `Company Name` Job Internship Analytics Industry
## <chr> <dbl> <dbl> <dbl> <chr>
## 1 ABB inc 1 1 0 Energy
## 2 AMD 0 1 1 Electronic
## 3 Alliant Systems 1 0 0 Internet
## 4 Allstate Insurance 1 0 1 Insurance
## 5 Ally 0 1 0 Banking
## 6 Amdocs 1 0 1 Internet
## 7 American Airlines 1 1 1 Transportation
## 8 APCON 1 1 0 Networking
## 9 Apex 1 1 1 Internet
## 10 Armeta Analytics 1 0 1 Internet
## 11 AT&T 1 1 0 Telecommunicat~
## 12 Avigilon 1 0 0 Other
## 13 Axtria 1 0 1 Management Con~
## 14 B.Braun Medical 1 0 1 Manufacturing
## 15 Bank Of America 1 0 0 Banking
## 16 BBVA 1 1 1 Banking
## 17 Big Compass 1 0 1 Internet
## 18 Blue Cross 0 1 1 Insurance
## 19 BNSF 1 1 1 Transportation
## 20 Broadleaf 1 1 0 Internet
## 21 Capgemini 1 0 1 Consulting
## 22 Capital One 1 1 1 Banking
## 23 Celanese 0 1 1 Automotive
## 24 Cisco 1 1 0 Internet
## 25 Citi 1 1 1 Banking
## 26 Cognizant 1 0 1 Internet
## 27 Collins Aerospace 0 1 1 Areospace
## 28 CoreLogic 1 1 1 Real Estate
## 29 COX 1 0 0 Other
## 30 Credera 1 1 1 Consulting
## 31 Dallas Area Rapid Transit 1 0 1 Transportation
## 32 Data Ductus 1 0 1 Networking
## 33 Emerson 0 1 0 Manufacturing
## 34 Equinix 1 1 1 Internet
## 35 Ethos Group 1 1 1 Insurance
## 36 FDM 1 0 1 Consulting
## 37 Ford Audio Video Dallas 1 1 1 Construction
## 38 Fujitsu 1 1 1 Telecommunicat~
## 39 Gallup 1 1 1 Consulting
## 40 Headstorm 1 1 1 Internet
## 41 Hilton 1 0 0 Hotels
## 42 IBM 0 1 1 Electronic
## 43 Industrial Networking Solut~ 1 1 0 Networking
## 44 Infosys 1 1 1 Internet
## 45 Innosvative software enginee~ 1 1 1 Internet
## 46 ISN 0 1 1 Internet
## 47 Jabe business Services 1 0 1 HealthCare
## 48 J C Penny 1 1 1 Retail
## 49 JP Morgan 1 1 1 Banking
## 50 KBR 1 0 0 Transportation
## 51 L&T 1 0 1 Consulting
## 52 L3Harris 1 1 0 Defense
## 53 Lennox 0 1 1 Manufacturing
## 54 Lockheed Martin 1 1 1 Areospace
## 55 Lone Star 1 0 1 Consulting
## 56 Marine Corps 1 0 0 Defense
## 57 Maxim 0 0 0 Electronic
## 58 Medecision 1 0 1 HealthCare
## 59 Medpace 1 0 1 Research
## 60 Mentalix 1 1 0 Internet
## 61 N-Tier 1 0 0 Internet
## 62 Naval Surface 1 1 0 Defense
## 63 Navy Cyber 1 0 0 Defense
## 64 NCR 1 1 1 Electronic
## 65 New York Air Brake 0 1 0 Manufacturing
## 66 Paycom 1 1 0 Internet
## 67 PepsiCO 1 1 1 CPG
## 68 Pioneer Natural Resource 1 1 1 Energy
## 69 Prolim Global 1 1 1 Consulting
## 70 Qentelli 1 1 1 Internet
## 71 Raytheon 1 1 1 Defense
## 72 rewardStyle 1 1 1 Internet
## 73 Rheem 1 1 0 Manufacturing
## 74 Robin 1 0 0 HealthCare
## 75 RSM 1 1 1 Consulting
## 76 Samsung Austin 1 1 1 Manufacturing
## 77 Samsung Semiconductors 1 1 0 Electronic
## 78 Skyworks 1 1 0 Electronic
## 79 Sogeti 1 0 1 Consulting
## 80 Southern Glazer 1 1 1 Retail
## 81 State Fram 1 1 1 Insurance
## 82 TCS 1 0 1 Consulting
## 83 TI 1 1 0 Electronic
## 84 Tinker Air 1 1 0 Defense
## 85 Toshiba 1 1 0 Manufacturing
## 86 TriTech 1 1 0 Internet
## 87 USAA 1 1 1 Insurance
## 88 Verizon 1 1 1 Telecommunicat~
## 89 Williss Towers 1 1 0 Other
## 90 Wipro 1 0 1 Consulting
## 91 Zyston 1 0 0 Networking