plot.stft.r

来自「一般的支持向量机算法比较单一」· R 代码 · 共 6 行

plot.stft <- function (x, col = gray (63:0/63), ...)
  {
    x <- x$values
    image(x=1:dim(x)[1], y=1:dim(x)[2], z=x, col=col, ...)
}