Question

我正在使用一个包函数（corenv，来自seewave）创建一个＆＃34;请等待......＆＃34;控制台中的消息。正如我反复称呼它，该消息非常烦人。所以，我需要一种方法：

从我的代码中，暂时禁止控制台消息

OR

访问功能代码并取消消息行

以下不是我的真实代码，而是一个显示问题的非常简单的代码

require(seewave)
a = seq(0, (2*pi), by=0.01) #simple, unreal example
for (i in sequence(100)){
  x = sin(a*i/3) #simple, unreal example
  y = sin(a*i/2) #simple, unreal example
  corenv(x,y,10,plot=FALSE)
}

一个非常简单的问题，但我还没有找到任何解决方案。我会给你任何帮助

Answer 1

您可以使用f = open("test.csv", "w") for i = 1:3 position = [j for j = i:(i + 10) ] string_position = string(position) n = length(string_position) write(f, string_position[2:(n - 1)]*"\n") end close(f)来捕获输出，例如

sink

您也可以将其包装在一个函数中，例如

sink("tmp.txt")
z = corenv(x,y,10,plot=FALSE)
sink()

避免使用控制台消息表单包函数

1 个答案: