Näytetään tekstit, joissa on tunniste riski. Näytä kaikki tekstit
Näytetään tekstit, joissa on tunniste riski. Näytä kaikki tekstit

tiistai 26. helmikuuta 2013

Sortinon luku -vaihtoehtoinen riskimittari



Sortinon luku on eräs olemassaolevista riskimittareista. Se on käytännössä yleisemmin käytetyn Sharpen luvun variaatio. Keskeisenä erona näillä kahdella mittarilla on se, että Sortinon luvussa laskentakaavan nimittäjässä on tappioriski (eli downside deviation). Tämän takia Sortinon luku lasketaan huomioimalla vain negatiiviset tuotonvaihtelut, jotka siis lähtökohtaisesti ovat niitä vaihteluita, joita sijoittaja ei halua omaan salkkuunsa.

Luvun keksi Frank A. Sortino. Idea on yksinkertainen; mitä enemmän mitattavalla kohteella on tapana liikkua alaspäin, sitä pienemmän suhdeluvun kaava antaa. Näin ollen pienen Sortino ration osakkeet (kohteet) ovat suuremmassa tappiovaarassa. Toisin sanoen kaava mittaa saamaasi (yli)tuottoa riskittömälle tuotolle ja suhteuttaa sen alaspäin heilahtelun määrään. Jos jotain kurssivaihtelu-pohjaista riskimetriikkaa haluaa käyttää, tämä luku voisi olla oiva vaihtoehto Sharpen luvulle. Sortinon luvun voi laskea luonnollisesti pelkälle yksittäiselle osakkeelle, mutta myös koko salkulle, varallisuuslajille tai indeksille, kunhan tietää käytettävät muuttujat yhtälöön.

lähde: wikipedia.com

Kaavassa R tarkoittaa esimerkiksi salkkusi realisoitunutta tuottoa, T tarkoittaa joko riskittömän koron määrää tai ns. MAR-lukua (eli minimun acceptable return), ja DR tarkoittaa downsiden riskiä. Nimittäjän laskeminen täytyy suorittaa hieman monimutkaisemmalla kaavalla.

lähde: investexcel.net

Alaspäin heilahtavaa kurssia mallinnetaan yllä olevalla kaavalla. Voit laskea myös Excelin VBA (Visual Basic Application) toiminnolla Sortinon ration suoraan, mikäli sinulla on dataa taulukoissasi. 


Sortinon Ratio VBA:lla laskettuna

Function SortinoRatio(returns As Range, MAR As Variant) As Variant
 
Dim n As Integer
Dim i As Integer
Dim avgReturn As Double
Dim mm2d As Double
Dim downDev As Double
 
n = returns.Rows.Count
avgReturn = WorksheetFunction.Average(returns)
moment2d = 0
For i = 1 To n
   If returns(i) - MAR < 0 Then
     mm2d = mm2d + ((returns(i) - MAR) ^ 2)
   End If
Next
downDev = Sqr(mm2d / n)
If downDev > 0 Then
   SortinoRatio = (avgReturn - MAR) / downDev
Else
   SortinoRatio = "undefined"
End If
 
End Function