주어진 데이터(basic2.csv)에서 새로운 컬럼(1일 이전 시차 컬럼)을 만들고, Events가 1이면서 Sales가 1000000이하인 조건에 맞는 새로운 컬럼 합을 구하시오 library(dplyr) library(data.table) df=read.csv('../input/bigdatacertificationkr/basic2.csv') df %>% mutate(lag=shift(PV,1)) %>% filter(Events==1 & Sales% summarise(value=sum(lag)) #정답 : 1894876 암기 library(data.table) shift(PV,1) #pv값을 다음으로 한칸 이동