Seu exemplo não é totalmente reproduzível.

Talvez a heatmap() faça interpolação de cores. A lattice::levelplot() pelo visto não faz.

K <- cor(mtcars)

require(lattice)

levelplot(K)

heatmap(K, Rowv=NA, Colv=NA)

À disposição.

Walmes.