Возможная проблема при построении объекта xts из функции

Question

Я обновился до последних версий R, XTS, Rstudio сегодня, пятница, 8 марта 2019 года.Вот очень простой пример, демонстрирующий возможную проблему при построении объекта 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()

В этом примере график не отображаетсябольше.Единственное различие между обеими функциями выше состоит в том, что «я что-то делаю» после вызова plot в последней функции (порядок печати).Та же проблема произошла бы, если бы я ввел некоторые другие команды (вместо печати).Эта проблема возникает при построении объекта XTS в функции.

Answer 1

Используйте печать вокруг вашего графика.

function_plot<-function()
{

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

}

function_plot()

Функция возвращает только последнее оцененное выражение, поэтому график не отображается.