Nhập chức năng S4 từ gói Ma trận

Question

Gói Matrix xác định toàn bộ bó phương pháp S4 để nhân ma trận, được gửi bởi các hàm chung chung S4 %*%, crossprod và tcrossprod.

Làm cách nào để nhập các phương thức "% *%", để sử dụng trong gói của riêng tôi? Đoạn mã này không thành công khi tôi chạy devtools::document():

#' @title my function 
#' 
#' @description Does magic Matrix stuff 
#' @import methods 
#' @importFrom Matrix "%*%" Diagonal 
myfun <- function(x, y){ 
    x %*% Diagonal(x=y) 
} 

Tôi muốn chắc chắn chức năng này sử dụng phương pháp Matrix nhân thưa thớt từ gói Matrix nếu x là một ma trận thưa thớt. Nhưng khi tôi chạy devtools::document() tôi nhận được lỗi sau:

Updating mypackage documentation 
Loading mypackage 
Error: object ‘%*%’ is not exported by 'namespace:Matrix' 

Answer 1

Bạn nên sử dụng @importMethodsFrom và loại bỏ các dấu ngoặc kép quanh các nhà điều hành. Bạn cũng có thể muốn xuất khẩu chức năng với @export (bạn có thể đã biết điều này nhưng nó làm cho câu trả lời hoàn chỉnh hơn). Các công trình sau đây cho tôi mà không có lỗi.

#' @title my function 
#' 
#' @description Does magic Matrix stuff 
#' @import methods 
#' @importFrom Matrix Diagonal 
#' @importMethodsFrom Matrix %*% 
#' @export 
myfun <- function(x, y){ 
    x %*% Diagonal(x=y) 
}