從函數內繪制 xts 對象時可能出現的問題

Question

我於 2019 年 3 月 8 日星期五今天升級到最新的 R、xts、Rstudio 版本。 這是一個非常簡單的示例，演示了從函數繪制 xts 對象時可能出現的問題。 為了演示這個問題，我有兩種情況：“正常工作”和“不起作用”情況：

這是“按原樣工作”的情況：

library(xts)
function_plot1<-function()
{
  data(sample_matrix)
  plot(as.xts(sample_matrix))
}

function_plot1()

我可以在繪圖面板中看到一個繪圖，這是應該的。

現在“不起作用”的情況：

function_plot<-function()
{

  data(sample_matrix)
  plot(as.xts(sample_matrix))
  print("")

}

function_plot()

在這個例子中，情節不再出現。 上述兩個函數之間的唯一區別是在后一個函數（打印順序）中的繪圖調用之后“我做某事”。 如果我引入了一些其他命令（而不是打印），也會發生同樣的問題。 在函數中繪制 xts 對象時會出現此問題。

Answer 1

在你的情節周圍使用打印。

function_plot<-function()
{

  data(sample_matrix)
  print(plot(as.xts(sample_matrix)))
  print("")

}

function_plot()

函數僅返回最后評估的表達式，這就是繪圖未呈現的原因。