Argumen FUN
Sering kali, fungsi yang ingin Anda terapkan memiliki argumen opsional lain yang mungkin ingin Anda ubah. Pertimbangkan fungsi percent_to_decimal() yang memungkinkan pengguna menentukan jumlah angka desimal.
percent_to_decimal(5.4, digits = 3)
[1] 0.054
Dalam pemanggilan lapply() Anda dapat menentukan argumen opsional bernama setelah argumen FUN, dan argumen tersebut akan diteruskan ke fungsi yang Anda terapkan.
my_list
$a
[1] 2.444 3.500
$b
[1] 1.100 2.678 3.450
lapply(my_list, FUN = percent_to_decimal, digits = 4)
$a
[1] 0.0244 0.0350
$b
[1] 0.0110 0.0268 0.0345
Dalam latihan ini, Anda akan memperluas kemampuan fungsi rasio Sharpe Anda agar pengguna dapat memasukkan tingkat bebas risiko sebagai argumen, lalu menggunakannya dengan lapply(). Sebuah data frame pengembalian harian saham dalam bentuk desimal bernama stock_return tersedia.
Latihan ini adalah bagian dari kursus
R Tingkat Menengah untuk Keuangan
Petunjuk latihan
- Perluas
sharpeagar memungkinkan input tingkat bebas risiko sebagai argumen opsional. Nilai default harus ditetapkan pada.0003. - Gunakan
lapply()padastock_returnuntuk mencari rasio Sharpe jika tingkat bebas risiko.0004. - Gunakan
lapply()padastock_returnuntuk mencari rasio Sharpe jika tingkat bebas risiko.0009.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Extend sharpe() to allow optional argument
sharpe <- function(returns, rf = ___) {
(mean(returns) - ___) / sd(returns)
}
# First lapply()
___
# Second lapply()
___