"금융데이터분석공모전"의 두 판 사이의 차이

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)