RasterVis में परावर्तक सतह को रोकना

Question

मैं ESRI ASCII ग्रिड रेखापुंज प्रारूप में डिजिटल इलाके मॉडल फ़ाइलों के साथ प्रयोग कर रहा हूं। इस प्रकार के डेटा के साथ शून्य अनुभव के बावजूद, मुझे नीचे दिए गए कोड के अनुसार आर में लोड करना बहुत आसान लगा। plot3Dसे समारोह rasterVisएक अच्छा देख साजिश लेकिन मॉडल के लिए पैकेज चूक नहीं बल्कि प्रतिबिंबित करती है। यह देखते हुए कि यह एक चमकदार सतह है, यह वास्तव में उचित नहीं है।

मैं एक और अधिक प्राकृतिक की तलाश कर रहा हूं (यदि इस तरह के शब्द का उपयोग आंकड़ों के एक सेट के 3 डी प्रतिपादन के बारे में किया जा सकता है), मैट, टोपोलॉजिकल प्लॉट।

मुझे लगता है कि इसके आस-पास के रास्ते होने चाहिए, लेकिन मुझे rasterकुछ पॉइंटर्स का उपयोग करने का कोई अनुभव नहीं है ।

मैं कथानक की प्रतिबिंबितता को कैसे कम या दूर कर सकता हूं?

library(raster)
library(rgdal)
library(rasterVis)

foo <- raster(readGDAL("my.dtm.asc"))
plot3D(foo)

Answer 1

मैंने कुछ परीक्षण किए और ?rgl.materialतर्क को खोजने के लिए आया specular, जिससे कार्य में मदद मिली।

नीचे दिए गए उदाहरण देखें:

library(raster)
library(rasterVis)

r = raster(volcano)

plot3D(r,lit=TRUE,specular="white") #white is default
plot3D(r,lit=TRUE,specular="black") #change specular to black

Answer 2

आपको प्लॉट 3 डी में तर्क पारित करने की आवश्यकता होगी जो "rgl.material" में उपलब्ध तर्कों का उपयोग करके आरजीएल डिस्प्ले विशेषताओं को संशोधित करते हैं। मैं "चमक" या "चमक" के साथ शुरू करूंगा। आप सीधे प्लॉट 3 डी में सीधे संबंधित rgl.material तर्कों को निर्दिष्ट करेंगे।

plot3D(foo, zfac=2, shininess=10) 

Answer 3

मैं आर और rasterVis पैकेज के साथ बहुत नया हूँ। एक चीज जो मुझे मददगार लगी है, वह यह देखने के लिए कि क्या आप जिस चीज की तलाश कर रहे हैं, उसे बेहतर तरीके से फिट कर सकते हैं, यह देखने के लिए कि आप क्या चाहते हैं, रंगों को संशोधित करने की कोशिश कर सकते हैं। उदाहरण के लिए मैंने कोशिश की है:

plot3D(foo, col=terrain.colors(6))

सुंदर सभ्य परिणामों के साथ। आप RColorBrewer पैकेज से पैलेट के साथ भी प्रयोग कर सकते हैं, जिनमें से कुछ कम चमकदार लगते हैं। उदाहरण के लिए:

plot3D(foo, col=brewer.pal(9, 'YlOrRd'))