如何在Rprofile.site中用fmatch（）替換match（）？

Question

我想用fmatch()替換默認的match()函數，它更快。以下代碼在R控制檯中工作

match<-fmatch 

unlockBinding('match', baseenv()) 
assign("match", fastmatch::fmatch, envir = baseenv()) 

但是，當我將任意一段代碼放入Rprofile.site中時，它總是給出錯誤。有人對此有經驗嗎？

Answer 1

將代碼放入.First函數中，並將其保存在用戶目錄中的默認工作區文件.Rdata中。

.First <- function() 
{ 
    ## Unless you unlock the binding, you can't change 
    ## an object in a locked namespace. 
    unlockBinding('match', baseenv()) 
    assign("match", fastmatch::fmatch, envir = baseenv()) 
}