r - ワイヤーフレームの色を手動で定義する

Question

格子パッケージを使用して、R でいくつかの面をプロットしています。表面の色を選択する方法が見つかりません。次に例を示します。

以下は、それぞれをプロットする方法の例です。

theseCol=heat.colors(150)
mm=paste("WB numbers where present\n(",nstoch," sims)",sep="")
WBnumbers=wbPrev_series
rownames(WBnumbers)=KList
colnames(WBnumbers)=iMwbList
wireframe(WBnumbers, zlim=c(0,max(wbPrev_series,na.rm=TRUE)), colorkey=FALSE, 
                    col.regions=theseCol, scales = list(arrows = FALSE), drape = TRUE, 
                    main=mm,  zlab="", xlab="K", ylab="iMwb")

最初の面はそのままで、他の面は z レベルではなく 1 番目の面の z レベルで色付けしたいと思います。複数のことを試しましたが、ワイヤーフレームは常に、現在の変数の可能な範囲として指定した色を受け入れます。

とにかくこれはできますか？ありがとう