從R代碼訪問R歷史記錄

Question

我知道歷史記錄功能，它在單獨的面板中顯示R歷史記錄以供用戶查看。我感興趣的是稍有不同。我希望能夠從R代碼本身訪問R歷史記錄，我可以請求最後的n個命令，並返回包含這些命令的向量。有這樣的事嗎？

Answer 1

tempfile <- tempfile(pattern="rhistory_", fileext=".txt") 
savehistory(tempfile) 
h <- readLines(tempfile) 

tail(h, 5) # display last 5 commands 
eval(parse(text=h[length(h)-1])) # exec last command but 1