[R lang 크롤링] (R) [전략적가치투자] - 증액 투자법  

(R) [전략적가치투자] - 증액 투자법

프로필

2019. 1. 18. 3:43

 

전략적가치투자 증액 투자법 R 코드입니다. 증액 투자법에 대한 이론적인 내용은 제 블로그 금융 주제에 있으니 먼저 읽고 와주시면 좋을 것 같네요. 그리고 기본적인 코드는 이전 포스트에서 했으므로 생략하겠습니다. 필요하신 분들은 아래의 주소를 참고해 주세요

https://blog.naver.com/jk940/221442437947

getincrease = function(money){ stock = matrix(NA,nrow=nrow(kospi),ncol=1) bond = matrix(NA,nrow=nrow(kospi),ncol=1) stock[1] = 0 # 주식에는 채권의 이자만큼 투자하므로 투자 초기시점에는 0 원을 투입합니다. bond[1] = money # 투자 초기시점에 채권에는 원금 전액을 투자합니다. for(i in 2:nrow(kospi)){ stock[i] = (stock[(i-1)]+(money*chaegwonret[(i-1)]))*(1+ret[(i-1)]) # 채권의 이자액과 전 달의 주식 평가액만큼 재투자 bond[i] = bond[(i-1)] # 지난 달 채권 평가액에서 이자만큼 뺐으므로 그대로 } result = cbind(stock,bond,stock+bond) colnames(result) = c('stock','bond','strategy') return(result) } increase = getincrease(200000000) increase

증액 투자법에서는 투자기간 초기에 원금을 전액 채권에 투자하고, 매달 수령하는 이자 전액만 주식에 투자하는 로직을 가지고 투자합니다. 그래서 처음 주식의 투자액은 0 원이며, 채권의 투자액은 원금입니다. 그 다음부터는 채권의 이자액과 주식의 전 달 평가액을 합친 금액만큼 주식에 재투자하고 채권에는 원금 그대로 남아있습니다.

경축! 아무것도 안하여 에스천사게임즈가 새로운 모습으로 재오픈 하였습니다.
어린이용이며, 설치가 필요없는 브라우저 게임입니다.
https://s1004games.com

아래는 증액 투자법을 통해 투자하였을 때 포트폴리오의 가치변화를 출력하는 코드입니다. 코스피와 채권을 벤치마크로 함께 출력했습니다.

plot(date,kospi_hold,type='l',main="주식과 채권에 각각 투자했을 때",ylab='가치(단위:억 원)',xlab='기간',ylim=c(7e+07,10e+08)) lines(date,chaegwon,type='l',col='blue') # 채권 벤치마크 abline(h=2e+08,col='red') # 원금선 lines(date,increase[,3],type='l',col='brown') legend('topleft',legend='정액',col='navy',pch='l')

다음은 증액 투자법과 기타 다른 전략들의 사용했을 때 주식 보유비중의 변화를 한 눈에 보기 쉽게 출력하는 코드입니다. 마찬가지로 다른 전략들 코드가 없으시다면 지난 포스트를 보고 코드를 먼저 실행해주신 뒤 따라오시면 됩니다.

plot(date,maib[,1]/maib[,3]*100,ylim=c(0,100),type='l',main='주식-채권 비중', ylab='주식보유%',xlab='기간',col='green') # 매입 보유법의 주식 보유 비중 abline(h=50,col='purple') # 정률 투자법의 주식 보유 비중 lines(date,maib[,2]/maib[,3]*100,col='blue') # 변율 투자법의 주식 보유 비중(매입보유법의 반대) lines(date,100000000/fixed[,3]*100,col='purple') # 정액 투자법의 주식 보유 비중) lines(date,increase[,1]/increase[,3]*100,col='brown') # 증액 투자법의 주식 보유 비중 legend("topleft",legend=c('매입','정률','변율','정액','증액'),col=c('green','purple','orange','navy','brown'),pch='l') grid() # 그래프 뒤의 점선 출력

읽어주셔서 감사드리고 보충해야할 점이나 궁금하신점 있으시면 댓글에 달아주시면 좋겠습니다.

[출처] https://m.blog.naver.com/jk940/221444840632

본 웹사이트는 광고를 포함하고 있습니다.
광고 클릭에서 발생하는 수익금은 모두 웹사이트 서버의 유지 및 관리, 그리고 기술 콘텐츠 향상을 위해 쓰여집니다.
번호 제목 글쓴이 날짜 조회 수
공지 오라클 기본 샘플 데이터베이스 졸리운_곰 2014.01.02 86453
공지 [SQL컨셉] 서적 "SQL컨셉"의 샘플 데이타 베이스 SAMPLE DATABASE of ORACLE 가을의 곰을... 2013.02.10 78894
공지 [G_SQL] Sample Database 가을의 곰을... 2012.05.20 95647
21 [국가기술자격 빅데이터분석기사] 빅데이터 분석기사 정보 및 필기 시험 후기 분석 (기출 문제 정리) file 졸리운_곰 2022.09.21 1554
20 [국가기술자격 빅데이터분석기사] `빅데이터분석기사` 자격증의 허상 졸리운_곰 2022.09.21 1502
19 [국가기술자격 빅데이터분석기사] 빅데이터 분석기사 요약 - 4과목. 빅데이터 결과 해석 졸리운_곰 2022.09.19 1997
18 [국가기술자격 빅데이터분석기사]빅데이터 분석기사 요약 - 3과목. 빅데이터 모델링 file 졸리운_곰 2022.09.19 1577
17 [국가기술자격 빅데이터분석기사]빅데이터 분석기사 요약 - 2과목. 빅데이터 탐색 file 졸리운_곰 2022.09.19 1577
16 [국가기술자격 빅데이터분석기사]빅데이터 분석기사 요약 - 1과목. 빅데이터 분석 기획 졸리운_곰 2022.09.19 1293
15 [국가기술자격 빅데이터분석기사] [빅데이터분석기사 필기 요약] I.빅데이터 분석 기획 - 02. 데이터 분석 계획 file 졸리운_곰 2022.09.15 1207
14 [국가기술자격 빅데이터분석기사][빅데이터분석기사 필기 요약] I.빅데이터 분석 기획 - 01. 빅데이터의 이해 (3) 졸리운_곰 2022.09.15 1841
13 [국가기술자격 빅데이터분석기사][빅데이터분석기사 필기 요약] I.빅데이터 분석 기획 - 01. 빅데이터의 이해 (2) file 졸리운_곰 2022.09.13 1382
12 [국가기술자격 빅데이터분석기사] [빅데이터분석기사 필기 요약] I.빅데이터 분석 기획 - 01. 빅데이터의 이해 (1) 졸리운_곰 2022.09.13 1802
11 [국가기술자격 빅데이터분석기사] [인공지능] 베이즈 정리 ( Bayes' theorem ) file 졸리운_곰 2022.09.04 1934
10 [ 국가기술자격 빅데이터분석기사 ] 빅데이터와 베이즈 정리 file 졸리운_곰 2022.09.04 1991
9 [국가기술자격 빅데이터분석기사] 빅데이터분석기사 - 필기 정리1 file 졸리운_곰 2022.09.01 2101
8 [국가기술자격 빅데이터분석기사] 빅데이터분석기사 노트정리 공유 file 졸리운_곰 2022.09.01 1758
7 [국가기술자격 빅데이터분석기사] 빅데이터 분석기사 : 개요 및 특징 file 졸리운_곰 2022.09.01 1426
6 [국가기술자격 빅데이터분석기사] 빅데이터 분석 기사 개요 file 졸리운_곰 2022.09.01 1507
5 [빅데이터분석기사 실기] 빅데이터분석기사 3회 실기 문제 복원 (기출) + 시험공부 팁 file 졸리운_곰 2022.02.07 2012
4 [빅데이터분석기사] 빅데이터분석기사 노트정리 공유 file 졸리운_곰 2022.02.07 3297
3 [빅데이터분석기사] 실기 : 시험 후기, [자격증] 빅데이터분석기사 실기 합격 후기 (비전공자 문과) file 졸리운_곰 2022.02.04 1785
2 [자격소개] 국가기술 빅데이터 분석기사 졸리운_곰 2021.01.07 1880
대표 김성준 주소 : 경기 용인 분당수지 U타워 등록번호 : 142-07-27414
통신판매업 신고 : 제2012-용인수지-0185호 출판업 신고 : 수지구청 제 123호 개인정보보호최고책임자 : 김성준 sjkim70@stechstar.com
대표전화 : 010-4589-2193 [fax] 02-6280-1294 COPYRIGHT(C) stechstar.com ALL RIGHTS RESERVED