การวิเคราะห์เพิ่มเติม

การเทรดหุ้นด้วย R

Ilya Kipnis

Professional Quantitative Analyst and R programmer

สร้างอนุกรม P&L (กำไรและขาดทุน)

Blotter environment เก็บประวัติธุรกรรมไว้
ไวยากรณ์สำหรับ P&L:

portPL <- .blotter$portfolio.firststrat$summary$Net.Trading.PL
head(portPL)

           Net.Trading.PL
1999-01-01           0
2003-01-02           0
2003-01-03           0
2003-01-06           0
2003-01-07           0
2003-01-08           0

Sharpe ratio

คำนวณได้จาก P&L ของกลยุทธ์
คืออัตราส่วนระหว่างผลตอบแทนและความเสี่ยงของกลยุทธ์

SharpeRatio.annualized(portPL, geometric = FALSE)

                                   Net.Trading.PL
Annualized Sharpe Ratio (Rf=0%)         0.5166274

การดึงผลตอบแทน

อัตราส่วนระหว่างกำไรหรือขาดทุนของแต่ละธุรกรรมหารด้วยส่วนทุนเริ่มต้น
ดึงผลตอบแทนของพอร์ตโฟลิโอ:

instrets <- 
      PortfReturns(account.st)

head(instrets, n = 3)

           LQD.DailyEndEq
2003-01-02           0
2003-01-03           0
2003-01-06           0

tail(instrets, n = 3)

            LQD.DailyEndEq
2015-12-29           0
2015-12-30           0
2003-12-31           0

การคำนวณ Sharpe ratio จากผลตอบแทน

SharpeRatio.annualized(instrets, geometric = FALSE)

                                  LQD.DailyEndEq
Annualized Sharpe Ratio (Rf=0%)        0.488011

มาฝึกกันเถอะ!

การเทรดหุ้นด้วย R