Dùng lapply với các đối số bổ sung
Trong video, hàm triple() đã được chuyển thành hàm multiply() để có cách tiếp cận tổng quát hơn. lapply() cung cấp cách xử lý các hàm cần nhiều hơn một đối số, như hàm multiply():
multiply <- function(x, factor) {
x * factor
}
lapply(list(1,2,3), multiply, factor = 3)
Ở bên phải, chúng tôi đã thêm một phiên bản tổng quát của các hàm chọn mà bạn đã viết trước đó: select_el(). Hàm này nhận một vector làm đối số thứ nhất và một chỉ số làm đối số thứ hai. Nó trả về phần tử của vector tại vị trí chỉ số đã chỉ định.
Bài tập này là một phần của khóa học
R nâng cao
Hướng dẫn bài tập
Dùng lapply() hai lần để gọi select_el() trên tất cả phần tử trong split_low: một lần với index bằng 1 và lần thứ hai với index bằng 2. Lần lượt gán kết quả cho names và years.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
# Definition of split_low
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:1857")
split <- strsplit(pioneers, split = ":")
split_low <- lapply(split, tolower)
# Generic select function
select_el <- function(x, index) {
x[index]
}
# Use lapply() twice on split_low: names and years