>>> df_adv = read.csv("C:/adv.csv")   # adv.csv 파일 읽기
>>> dim(df_adv)
[1] 200 5

# 플롯 그리기
>>> plot(df_adv$TV, df_adv$sales)

# 파티셔닝하기
>>> idx = sample(1:nrow(df_adv), 0.7*nrow(df_adv))
>>> train = df_adv[ idx, ]
>>> test = df_adv[-idx, ]