"금융데이터분석공모전"의 두 판 사이의 차이
hiblue
3번째 줄: | 3번째 줄: | ||
'''엑셀 불러오기''' | '''엑셀 불러오기''' | ||
− | data1<-read.xlsx(xlsxFile = "C:/Users/heayoung/Desktop/실습/대욱이공모전/sample.xlsx", sheet = 1, skipEmptyRows = TRUE) | + | <span style="color:RoyalBlue ">data1<-read.xlsx(xlsxFile = "C:/Users/heayoung/Desktop/실습/대욱이공모전/sample.xlsx", sheet = 1, skipEmptyRows = TRUE)</span> |
− | + | ||
'''10개의 행만 보이기''' | '''10개의 행만 보이기''' | ||
− | population[c(1:10),] | + | <span style="color:RoyalBlue ">population[c(1:10),]</span> |
'''KOSPI 월별 중간값''' | '''KOSPI 월별 중간값''' | ||
− | aggregate(kospi~year(date)+month(date), data1, median) | + | <span style="color:RoyalBlue ">aggregate(kospi~year(date)+month(date), data1, median)</span> |
2018년 2월 12일 (월) 15:39 판
연도별 합계구하기
aggregate(kospi~year(date),data1, sum)
엑셀 불러오기
data1<-read.xlsx(xlsxFile = "C:/Users/heayoung/Desktop/실습/대욱이공모전/sample.xlsx", sheet = 1, skipEmptyRows = TRUE)
10개의 행만 보이기
population[c(1:10),]
KOSPI 월별 중간값
aggregate(kospi~year(date)+month(date), data1, median)