본문 바로가기
통계프로그램 비교 시리즈/프로그래밍비교(Oracle,Python,R,SAS)

[중복 제거(Distinct)] 특정 조건을 만족하는 데이터 추출 - 비상관 서브쿼리(In) - 151 (오라클 SQL, R, Python, SAS)

by 기서무나구물 2023. 1. 4.

포스팅 목차

     

    151. Display those who working as manager using co related sub query.

     

    * 서브쿼리를 사용하여서 관리자로 근무하고 있는 직원들의 정보를 출력하시오.

    • 파이썬 & R 패키지 호출 및 예제 데이터 생성 링크
    • 유사문제 : 81 / 82 / 86 / 111 / 112 / 118 /120 / 137번과 동일
    • [데이터 추출] 특정 조건을 만족하는 데이터 추출 - 비상관 서브쿼리(In), 중복 제거(Distinct)
    • 데이터 전처리 (SQL, Pandas, R Prog, Dplyr, Dfply, SQLDF, PANDASQL, DATA.TABLE, SAS, Proc Sql)
    • Oracle : 비상관 서브쿼리, IN 연산자
    • 파이썬 Pandas : isin()
    • R 프로그래밍 : %in%, unlist()
    • R Dplyr Package : %in%, unlist()
    • R sqldf Package : 비상관 서브쿼리, IN 연산자
    • Python pandasql Package : 비상관 서브쿼리, IN 연산자
    • R data.table Package : %in%, unlist()
    • SAS Proc SQL : 비상관 서브쿼리, IN 연산자
    • SAS Data Step : proc sort의 nodupkey, Rename 데이터 세트 옵션, Merge 구문, IF 조건문
    • Python Dfply Package : @pipe 와 def 사용자 정의 함수(pull_list), filter_by(), isin()
    • 파이썬 Base 프로그래밍 :

     

    1. Oracle(오라클)

    서브쿼리를 통하여 emp테이블의 관리자 사원번호(‘mgr’)에 명단이 존재하는 사원번호(‘empno’)를 선택한다.

     

    Oracle Programming 
    Select * 
from   emp 
where  empno in (select mgr from emp);

     

    2. Python Pandas(파이썬)

    isin 함수를 사용하여 emp테이블의 관리자 사원번호(‘mgr’)에 명단이 존재하는 사원번호(‘empno’)를 선택한다.

     

    Python Programming 
    emp[emp['empno'].isin(emp['mgr']) ]

     


    Results
      empno ename job mgr hiredate sal comm deptno
    3 7566 JONES MANAGER 7839.0 1981/04/02 2975 NaN 20
    5 7698 BLAKE MANAGER 7839.0 1981/03/01 2850 NaN 30
    6 7782 CLARK MANAGER 7839.0 1981/01/09 2450 NaN 10
    7 7788 SCOTT ANALYST 7566.0 1982/12/09 3000 NaN 20
    8 7839 KING PRESIDENT NaN 1981/11/17 5000 NaN 10
    12 7902 FORD ANALYST 7566.0 1981/12/03 3000 NaN 20

     

    3. R Programming (R Package)

    %in% 함수를 사용하여 emp테이블의 관리자 사원번호(‘mgr’)에 명단이 존재하는 사원번호(‘empno’)를 선택한다.

     

    R Programming 
    %%R

emp[emp$empno %in% unlist(emp[ "mgr" ]),]

     

    Results 
    # A tibble: 6 x 8
  empno ename job         mgr hiredate     sal  comm deptno
  <dbl> <chr> <chr>     <dbl> <date>     <dbl> <dbl>  <dbl>
1  7566 JONES MANAGER    7839 1981-04-02  2975    NA     20
2  7698 BLAKE MANAGER    7839 1981-03-01  2850    NA     30
3  7782 CLARK MANAGER    7839 1981-01-09  2450    NA     10
4  7788 SCOTT ANALYST    7566 1982-12-09  3000    NA     20
5  7839 KING  PRESIDENT    NA 1981-11-17  5000    NA     10
6  7902 FORD  ANALYST    7566 1981-12-03  3000    NA     20

     

    4. R Dplyr Package

    %in% 함수를 사용하여 emp테이블의 관리자 사원번호(‘mgr’)에 명단이 존재하는 사원번호(‘empno’)를 선택 후 filter() 함수를 통하여 선택된 사원들의 정보를 출력한다.

     

    R Programming 
    %%R

emp %>%
  dplyr::filter( empno %in% ( emp  %>% dplyr::select(mgr) %>% unlist() ))

     

    Results 
    # A tibble: 6 x 8
  empno ename job         mgr hiredate     sal  comm deptno
  <dbl> <chr> <chr>     <dbl> <date>     <dbl> <dbl>  <dbl>
1  7566 JONES MANAGER    7839 1981-04-02  2975    NA     20
2  7698 BLAKE MANAGER    7839 1981-03-01  2850    NA     30
3  7782 CLARK MANAGER    7839 1981-01-09  2450    NA     10
4  7788 SCOTT ANALYST    7566 1982-12-09  3000    NA     20
5  7839 KING  PRESIDENT    NA 1981-11-17  5000    NA     10
6  7902 FORD  ANALYST    7566 1981-12-03  3000    NA     20

     

    5. R sqldf Package

    emp 테이블의 사원번호(‘empno’)가 서브쿼리의 관리자 사원번호(‘mgr’) 리스트에 명단이 존재하는 사원들의 정보를 선택하여서 관리자 역할을 수행하고 있는 사원들의 정보를 출력한다.

     

    R Programming 
    %%R

sqldf(" Select * 
        from   emp 
        where  empno in (select mgr from emp);")

     

    Results 
      empno ename       job  mgr   hiredate  sal comm deptno
1  7566 JONES   MANAGER 7839 1981-04-02 2975   NA     20
2  7698 BLAKE   MANAGER 7839 1981-03-01 2850   NA     30
3  7782 CLARK   MANAGER 7839 1981-01-09 2450   NA     10
4  7788 SCOTT   ANALYST 7566 1982-12-09 3000   NA     20
5  7839  KING PRESIDENT   NA 1981-11-17 5000   NA     10
6  7902  FORD   ANALYST 7566 1981-12-03 3000   NA     20

     

    6. Python pandasql Package

    서브쿼리를 통하여 emp테이블의 관리자 사원번호(‘mgr’)에 명단이 존재하는 사원번호(‘empno’)를 선택한다.

     

    Python Programming 
    ps.sqldf(" Select * from emp                   \
           where  empno in(select mgr from emp);")

     


    Results
      empno ename job mgr hiredate sal comm deptno
    0 7566 JONES MANAGER 7839.0 1981/04/02 2975 None 20
    1 7698 BLAKE MANAGER 7839.0 1981/03/01 2850 None 30
    2 7782 CLARK MANAGER 7839.0 1981/01/09 2450 None 10
    3 7788 SCOTT ANALYST 7566.0 1982/12/09 3000 None 20
    4 7839 KING PRESIDENT NaN 1981/11/17 5000 None 10
    5 7902 FORD ANALYST 7566.0 1981/12/03 3000 None 20

     

    7. R data.table Package

    %in% 함수를 통하여 emp테이블의 관리자 사원번호(‘mgr’)에 명단이 존재하는 사원번호(‘empno’)를 선택한다.

     

    R Programming 
    %%R
DT <- data.table(emp)

DT[DT[,empno %in% unlist(DT[ ,.(mgr)])]]

     

    Results 
       empno ename       job  mgr   hiredate  sal comm deptno
1:  7566 JONES   MANAGER 7839 1981-04-02 2975   NA     20
2:  7698 BLAKE   MANAGER 7839 1981-03-01 2850   NA     30
3:  7782 CLARK   MANAGER 7839 1981-01-09 2450   NA     10
4:  7788 SCOTT   ANALYST 7566 1982-12-09 3000   NA     20
5:  7839  KING PRESIDENT   NA 1981-11-17 5000   NA     10
6:  7902  FORD   ANALYST 7566 1981-12-03 3000   NA     20

     

    8. SAS Proc SQL

    서브쿼리를 통하여 emp테이블의 관리자 사원번호(‘mgr’)에 명단이 존재하는 사원번호(‘empno’)를 선택한다.

     

    SAS Programming 
    %%SAS sas

PROC SQL;
  CREATE TABLE STATSAS_1 AS
    Select * 
    from   emp 
    where  empno in (select mgr from emp);;
QUIT;
PROC PRINT;RUN;

     


    Results
    OBS empno ename job mgr hiredate sal comm deptno
    1 7566 JONES MANAGER 7839 1981-04-02 2975 . 20
    2 7698 BLAKE MANAGER 7839 1981-03-01 2850 . 30
    3 7782 CLARK MANAGER 7839 1981-01-09 2450 . 10
    4 7788 SCOTT ANALYST 7566 1982-12-09 3000 . 20
    5 7839 KING PRESIDEN . 1981-11-17 5000 . 10
    6 7902 FORD ANALYST 7566 1981-12-03 3000 . 20

     

    9. SAS Data Step

     

    SAS Programming 
    %%SAS sas

proc sort data=emp out=emp_1(rename=empno=join_key);
     by empno;
run;

proc sort data=emp out=emp_2(rename=mgr=join_key keep=mgr) nodupkey;
     by mgr;
run;

DATA STATSAS_2;
 merge emp_1(in=a) emp_2(in=b);
     by join_key;
     if a and b;
RUN;
PROC PRINT;RUN;

     


    Results
    OBS join_key ename job mgr hiredate sal comm deptno
    1 7566 JONES MANAGER 7839 1981-04-02 2975 . 20
    2 7698 BLAKE MANAGER 7839 1981-03-01 2850 . 30
    3 7782 CLARK MANAGER 7839 1981-01-09 2450 . 10
    4 7788 SCOTT ANALYST 7566 1982-12-09 3000 . 20
    5 7839 KING PRESIDEN . 1981-11-17 5000 . 10
    6 7902 FORD ANALYST 7566 1981-12-03 3000 . 20

     

    10. Python Dfply Package

     

    Python Programming 
    # [참고] 함수 사용. (52번 예제 참고) : AttributeError: 'DataFrame' object has no attribute 'ix'
@pipe
def pull_list(df, column=-1):
    return df.loc[:, column]

emp >> \
  filter_by( X.empno.isin( emp >> select(X.mgr) >> pull_list("mgr")))

     


    Results
      empno ename job mgr hiredate sal comm deptno
    1 7566 JONES MANAGER 7839.0 1981/04/02 2975 NaN 20
    2 7698 BLAKE MANAGER 7839.0 1981/03/01 2850 NaN 30
    3 7782 CLARK MANAGER 7839.0 1981/01/09 2450 NaN 10
    4 7788 SCOTT ANALYST 7566.0 1982/12/09 3000 NaN 20
    5 7839 KING PRESIDENT NaN 1981/11/17 5000 NaN 10
    6 7902 FORD ANALYST 7566.0 1981/12/03 3000 NaN 20

     

    [SQL, Pandas, R Prog, Dplyr, SQLDF, PANDASQL, DATA.TABLE]   SQL EMP 예제로 만나는 테이블 데이터 전처리 방법 리스트

    반응형
    저작자표시 비영리 변경금지

    '통계프로그램 비교 시리즈 > 프로그래밍비교(Oracle,Python,R,SAS)' 카테고리의 다른 글

    [변수 생성] 신규 변수를 생성하여 출력- 153 (오라클 SQL, R, Python, SAS)  (0) 2023.01.06
    [데이터 상하 결합(UNION)] 특정 조건을 만족하는 데이터 추출 - 비상관 서브쿼리 - 152 (오라클 SQL, R, Python, SAS)  (0) 2023.01.04
    [등가 데이터 결합] 특정 조건을 만족하는 데이터 추출 - 비상관 서브쿼리 - 150 (오라클 SQL, R, Python, SAS)  (0) 2023.01.03
    [비등가 데이터 결합] 특정 조건을 만족하는 데이터 추출 - 상관 서브쿼리(Any) - 149 (오라클 SQL, R, Python, SAS)  (0) 2023.01.03
    [날짜 함수] 특정 조건에 따라 해당 날짜 반환 - 148 (오라클 SQL, R, Python, SAS)  (1) 2023.01.03

    관련글

    댓글

    티스토리툴바