제4회 빅데이터분석기사 실기 만점 후기 2/3 (작업형 1형)

저는 아직 파이썬은 다룰줄 몰라서 R을 선택해서 작업형 1형도 여러번 반복해가면서 풀었습니다.

처음에 2문제만 대충 빠르게 풀고 작업형 2형으로 넘어갔습니다.

 

시험은 테스트(https://dataq.goorm.io/exam/116674/%EC%B2%B4%ED%97%98%ED%95%98%EA%B8%B0/quiz/2) 환경하고 정말 똑 같았어요.

그런데 R로 작업형 시험을 치르는 저는, 처음에 답안 작성 유의사항을 보고 머리가 순간 멈추었죠.

코딩하는 영역에는 # 답안 제출 예시  # print(변수명) 같은 안내 멘트가 완전(?) 거의(?) 똑같이 제공이 되었습니다.

그런데 왼쪽 문제 표시 영역에, 답안 작성 요령이 아주 아주 상세히 적혀있었는데

R 사용자의 경우에도 [1] 없이 123 만 나와야 정답이고 [1] 이 앞에 있으면 오답이라고 하는 거에요.

예 : [1] 123 <-- 오답

 

아니 이게 무슨 말인가? 어디에서는 print 로 찍으라고 해놓고, print 로 찍으면 [1]  은 무조건 나오는 거 같은데, [1]이 나오면 안된다니 내가 모르는 어떤 방법이 있는 것일까?

 

암튼, 방법은 천천히 생각하기로 하고 두 문제를 후다닥 대충 풀었어요.

문제 스타일은 Datamanim 에서 풀어본 것과 비슷해서 큰 도움을 받았습니다.

https://www.datamanim.com/dataset/03_dataq/main_p1_r.html

작업형 제 1유형 예시문제 (코드기여자 : 익명요청 ㅠ) — DataManim

 

 

[1] 없애는 법 모르면 아무 의미 없다는 생각에,  2문제만 정말 대충 풀고 작업형  2유형으로 갔습니다.

작업형 2유형 40점 만점받고 단답형 20점 맞으면 여기는 다 틀려도 되잖아요.

 

그런데 2유형이 만만치 않아서, 생각을 고처먹고 두번째 돌 때는 왼쪽 패널의 문제를 다시 꼼꼼히 보았습니다.

cat 으로 작성하라고 되어있는 것을 확인했고 cat 으로 했어요. print 대신 cat 을 쓰니 [1] 없이 답만 나와서 안심이 되었어요.

 

 

3문제 풀이를 생각나는 대로 적어볼께요.

 

1번 
-------------------------- 
q1 <- quantile(a,1/4)
q3 <- quantile(a,3/4) 
d <- trunc(q3-q1) 
d <- trunc(abs(q3-q1))  
cat(d) 

# 처음에는 abs 안했는데 3번째쯤 다시 볼 때 차이의 절대값을 구하라는 지문을 확인했고 abs 를 추가했어요.  
  
 2번 
-------------------------- 
num_wow와 num_loves의 합( 긍정적인 평가) 에 num_reactions의 비율을 구해서  0.4보다 크고 0.5보다 작은 비율 중  status_type 이 video인 갯수를 구하라   

 

dplyr 패키를 이용해서 풀었는데 기억이 잘 안나네요.

아무튼, 

a %>% mutate(ratio =((num_wow+num_loves)/num_reactions)) %>%

            filter(ratio > 0.4.... 

            group_by summarize .. 이런 패턴으로 구했어요.

          
vidio 조건을 처음에는 못보고 풀었어요. 나중에 발견해서 조건을 추가했는데 결과가 그대로여서 조금 의아했었던 기억이 납니다.  

 

3번 
-------------------------- 
문제. 2018년 1월의 무슨무슨 건수를 구하라.

풀이 답안
library(stringr) 
a %>% filter(str_detect(date_added,'January [1-3][0-9]?,2018')) -> dd 
cat(nrow(dd)) 
 

lubridate 패키지 공부를 하지 않은 상태였기 때문에 정규식으로 처리했어요. 
문제에는 Jauary 가 아닌 숫자로 1월이라고 되어있어서  'January 1,2018'  이라고 조건을 주었어요. 1이라는 날짜가 월로 보였던 것이지요. 시험이라는 압박감때문인지 groom 의 불편함 때문이었는지 반복해서 문제 다시 볼때마다 제가 놓쳤던 부분을 계속 발견했어요.

 

암튼 처음에는 조건을 잘못 주어서 1건 밖에 안나왔는데, 다시 풀 때 2018년 건수는 얼마인지, str_detect 를 이용해서 2018년 데이터의 날짜들은 어떤 애들이 있는지 살펴보면서 제가 착각한 것을 알아차리고 수정했네요.

    
시험 끝나고 나서는 cat(nrow(dd)) 이렇게 작성한 부분도 맘에 걸렸어요. 

아래  처럼 cat(변수명) 이런 방식 안지켰다고 0점 처리하는거 아닐까하는 걱정이 있었습니다. 

 

#모범답안

zz <- nrow(dd) 

cat(zz)

 

 

제4회 빅데이터분석기사 실기 만점 후기 3/3 (작업형 2형)