R/plot.panelNNET.R

plot.panelNNET <-
function(x, y = NULL, logmse = FALSE,...){
  par(mfrow = c(1,2))
  plot(x$y, x$yhat)
  if(logmse){
    plot(log10(x$msevec))
  } else {
    plot(x$msevec)
  }
}
cranedroesch/panelNNET documentation built on May 14, 2019, 11:31 a.m.