Как подать тензор к предварительно обученной модели в вычислительном графе с керасом?

Это даст вам очертания состояния зеленым цветом с прозрачным серым наложением:

map(database= "state", col="green", fill=FALSE)
map(database= "usa", col="#AAAAAA22", fill=TRUE,lty=0,add=TRUE)

(добавлено значение «альфа» для серого цвета, чтобы границы «отображались» ... см. ?rgb и ?col2rgb.) Это добавляет ярлыки, но очень беспорядочно и с дополнительными областями:

map.text(database="state", add=TRUE) #  Not advised

Я думаю, что потребуется дополнительная работа с набором данных state в наборе наборов данных для сопоставления аббревиатуры к государственным центрам.

?state

Это показалось эффективным, хотя вы можете сделать текст немного меньшим с помощью cex = 0.6:

text(x=state.center$x, y=state.center$y, state.abb)  # better

[/g0]

С некоторой дополнительной настройкой вы можете удалить часть границы, перезаписав ее белым:

map(database= "state", col="green", fill=FALSE)
map(database= "usa", col="#FFFFFF", fill=FALSE,add=TRUE, lwd=1.5)   # the overwrite of boundary
map(database= "usa", col="#AAAAAA22", fill=TRUE,lty=0,add=TRUE)   # note the transparency
text(x=state.center$x, y=state.center$y, state.abb, cex=0.5)

[/g1]