[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 86423
공지 [SQL컨셉] 서적 "SQL컨셉"의 샘플 데이타 베이스 SAMPLE DATABASE of ORACLE 가을의 곰을... 2013.02.10 78856
공지 [G_SQL] Sample Database 가을의 곰을... 2012.05.20 95622
101 [NoSQL] 성공적인 NoSQL 도입을 위한 키포인트 : NoSQL 데이터 모델링 file 졸리운_곰 2024.08.10 1080
100 [NoSQL] [MongoDB] NOSQL 데이터 모델링 기법 살펴보기 file 졸리운_곰 2024.08.09 1004
99 [NoSQL][MongoDB] Truncate a collection 졸리운_곰 2023.06.04 1273
98 [NoSQL] MongoDB 인증 모드 (password) 설정 졸리운_곰 2023.03.26 1419
97 [NoSQL] [Redis] Redis Persistence(영속성) 졸리운_곰 2021.04.11 1645
96 [NoSQL] [Cloud] Redis 설치, 사용 방법, 데이터 백업을 위한 RDB & AOF 개념 및 간단한 Redis 사용 사례 연구 file 졸리운_곰 2021.04.11 1716
95 [mongodb , 몽고디비] How to Use MongoDB Comparison Query Operators in Java 졸리운_곰 2021.02.19 1508
94 [mongodb, 몽고디비] How do you query for “is not null” in Mongo? 졸리운_곰 2021.02.19 1270
93 [MongoDB] 확장 검색 쿼리 - Aggregation 파이프라인 스테이지(Pipline Stage)와 표현식 졸리운_곰 2021.02.16 1192
92 [MongoDB] 확장 검색 쿼리 - 범용 Aggregation 졸리운_곰 2021.02.16 1349
91 [MongoDB] 확장 검색 쿼리 - Aggregation의 목적 및 작동방식 file 졸리운_곰 2021.02.16 1068
90 [MongoDB] 확장 검색 쿼리 - 집계 파이프 라인연산자 종류 졸리운_곰 2021.02.16 1141
89 [MongoDB] 확장 검색 쿼리 - Aggregation 파이프라인 스테이지(Pipline Stage)와 표현식 졸리운_곰 2021.02.16 1299
88 [mongodb, 몽고디비 쿼리] Mongodb query on substring of a field 졸리운_곰 2021.02.16 1307
87 [mongodb]Spring boot와 mongoDB 연동하기 그리고 REST API 졸리운_곰 2021.01.21 1706
86 [WebApp / Express] 간단한 MongoDB Middleware 만들기 졸리운_곰 2020.12.29 1152
85 [mongodb] Error: network error while attempting to run command 'isMaster' on host '127.0.0.1:27017' file 졸리운_곰 2020.12.16 1450
84 [mongodb] How to Update a Document in MongoDB using Java 졸리운_곰 2020.12.14 2331
83 [Java, MongoDB] Mapping a BSON MongoDB document to a MyClass.class object? 졸리운_곰 2020.12.09 1821
82 [mongodb] MongoDB CRUD 동작의 이해 졸리운_곰 2020.12.07 1286
대표 김성준 주소 : 경기 용인 분당수지 U타워 등록번호 : 142-07-27414
통신판매업 신고 : 제2012-용인수지-0185호 출판업 신고 : 수지구청 제 123호 개인정보보호최고책임자 : 김성준 sjkim70@stechstar.com
대표전화 : 010-4589-2193 [fax] 02-6280-1294 COPYRIGHT(C) stechstar.com ALL RIGHTS RESERVED