Возникли проблемы с сохранением графика нейронной сети с помощью пакета нейронной сети -R

Я использую пакет neuralnetв R, однако у меня возникают проблемы с сохранением графика на диск.

data(iris)
attach(iris)
library(neuralnet)

nn <- neuralnet(as.numeric(Species) ~ Sepal.Length + Sepal.Width + Petal.Length + Petal.Width, data = iris)

png("test.png")
plot(nn)
dev.off()

Пытался сослаться на руководство , в разделе plot.nn()написано:

file      a character string naming the plot to write to. If not stated, 
the plot will not be saved.

Однако выполнение следующих действий не приводит к сохранению действительного графика:

png("test.png")
plot(nn, file = "test.png")
dev.off()

Платформа:

Mac OSX 10.7.3

Версия R:

platform       x86_64-apple-darwin11.3.0    
arch           x86_64                       
os             darwin11.3.0                 
system         x86_64, darwin11.3.0         
status                                      
major          2                            
minor          15.1                         
year           2012                         
month          06                           
day            22                           
svn rev        59600                        
language       R                            
version.string R version 2.15.1 (2012-06-22)
nickname       Roasted Marshmallows  

Примечание :R был установлен через macports