connect by 필기

##connect by : 계층형 쿼리, 오라클에만 있는 방법, 계층형으로 쿼리를 만들수 있다.

select ename, level, mgr

from emp

start with ename='KING'

connect by prior empno = mgr; 

--connect by empno = prior mgr; 이렇게 해도 나옴

--KING의 직속 부하들이 걸려서 나옴, 트리의 레벨처럼..?

--말단인 SMITH의 emp를 mgr로 갖고 있는 사람이 없으니 위에 FORD로 올라감

--내부의 트리구조..!!ㅎㅎ => 그래서 계층형 쿼리..!

--오라클9때는 많이 썼는데 Ansi에서는 안쓰이게 됨..

select level as day,

        ceil(dbms_random.value(80,90)) as amt

from  dual

connect by level <= 30

 --1-30까지 80-90사이의 난수발생

plot(result)

=> 결과

result <- dbGetQuery(conn, myquery)  

plot(result, 

     ylim=c(70,100),

     type = "l") ##라인으로 바꿔줌

자소서에 성적그래프라던지 이렇게 넣으면 좋을것 같다...!

plot(result, 

     ylim=c(70,100),

     type = "l", ##라인으로 바꿔줌

     lty=2,

     col = 'red',

     main = '점수변화') 

select job,

sum(sal) / (select sum(sal) from emp) ratio

from emp

group by job

order by job;

sum(sal), --업무별 급여 합계

(select sum(sal) from emp) --전체 합계

select count(distinct job) from emp; -- 총 업무 5개

##파이차트

pie(r1$RATIO, r1$JOB)

##업무갯수 

query2 <- "select count(distinct job) from emp" ##쿼리2저장

r2 <- dbGetQuery(conn, query2) ##쿼리2 실행

r2

##무지개 색깔

pie(r1$RATIO, job_labels, col=rainbow(r2$`COUNT(DISTINCTJOB)`),

    border='white')

job_labels <- paste(r1$JOB, "\n","(",r1$RATIO,"%)")

job_labels