FUN 인수
적용하려는 함수에는 조정할 수 있는 선택적 인수가 함께 있는 경우가 많아요. 예를 들어, 소수 자릿수를 지정할 수 있는 percent_to_decimal() 함수를 생각해 봅시다.
percent_to_decimal(5.4, digits = 3)
[1] 0.054
lapply()를 호출할 때는 FUN 인수 다음에 이름 붙은 선택적 인수를 지정할 수 있고, 그러면 해당 인수들이 적용하려는 함수로 전달됩니다.
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
이 연습 문제에서는 샤프 지수 함수의 기능을 확장해 사용자가 무위험 수익률을 인수로 입력할 수 있도록 하고, 이를 lapply()와 함께 사용해 봅니다. 소수 형태의 일별 주식 수익률 데이터 프레임 stock_return이 제공됩니다.
이 연습은 강의의 일부입니다
금융을 위한 R 중급
연습 안내
sharpe를 확장해 무위험 수익률을 선택적 인수로 입력할 수 있게 하세요. 기본값은.0003으로 설정합니다.stock_return에lapply()를 사용해 무위험 수익률이.0004일 때의 샤프 지수를 구하세요.stock_return에lapply()를 사용해 무위험 수익률이.0009일 때의 샤프 지수를 구하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Extend sharpe() to allow optional argument
sharpe <- function(returns, rf = ___) {
(mean(returns) - ___) / sd(returns)
}
# First lapply()
___
# Second lapply()
___