पर एक किंवदंती जोड़ना इंटरैक्टिव 3 डी प्लॉट्स के लिए संभावित पैकेजों में से एक है rgl। मैं कुछ कारक चर के अनुसार रंग कोडिंग के साथ 3 डी स्कैटरप्लॉट बनाने के लिए क्या करना चाहता हूं। 3 डी आयामी स्कैटरप्लॉट plsr विश्लेषण से परिणामी लोडिंग के लिए है।scatter3d plot
जिसके परिणामस्वरूप साजिश लग रहा है
तरह उदाहरण डेटा किसी तालिका में दिया जाता है:
> loadings
| Comp 1 | Comp 2 | Comp 3 | Class
-------------------------------------------------------------------------------------------
TEMP | -0.0607044182964255 | "0.0437618450165671" |"0.045124991801441" | "global"
MW | "-0.13414890573833" | "-0.0970537799069731" |0.263043734662182" | "local"
DM |"-0.183751529577861" | "-0.102703237685933" |"0.0640549385564205" | "global"
CHG |"-0.0558781715833019"| "0.125155347350922" |"-0.119258450107321" | "local"
या उत्पन्न किया जा सकता:
loadings <- data.frame(Comp1 = c(1.2, 3.4, 5.6, 13.1), Comp2 = c(4.3, 1.2, 7.7, 9.8),
Comp3 = c(1.2,6.9,15.6,15.0),
row.names = c("TEMP", "MW", "DM", "CHG"),
Class = c("global", "local", "global", "local"))
scatter3d(x=loadings[[1]], y=loadings[[2]], z=loadings[[3]],
point.col = as.numeric(as.factor(loadings[,4])), size = 10)
प्राप्त साजिश एस है मुझे शैली है, लेकिन बहुत सरल है वहाँ चर "क्लास" के केवल दो स्तर हैं के रूप में: 'वैश्विक' और 'स्थानीय'
प्रश्न है: यह RGL भीतर कथा जोड़ने के लिए किसी भी संभावना है या शायद कुछ स्वतंत्र किंवदंती साजिश से जुड़ा जा सकता है? मदद के लिए अग्रिम धन्यवाद!
जवाब है:
scatter3d(x=loadings[[1]], y=loadings[[2]], z=loadings[[3]],
point.col = as.numeric(as.factor(loadings[,4])), size = 10, type = 's')
text3d(x=1.1, y=c(.9,1), z=1.1,levels(loadings[[4]]),col="black")
points3d(x=1.2,y=c(.9,1),z=1.1, col=as.numeric(as.factor(loadings[,4])), size=5)
वर्गों के अनुसार लेबल के साथ साजिश:
कृपया कोड जोड़ सकते हैं और संभव डेटा (वास्तविक या बना-अप) अपने प्रश्न का इतनी के रूप में एक [न्यूनतम रेपर बनाने के लिए करता है, तो oducible उदाहरण] (http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example)। – SlowLearner
वह नया कोड एक त्रुटि फेंकता है: "पूर्ण.cases में त्रुटि (x, y, z): ..."। पी –
उस त्रुटि को ठीक किया गया। – Boddha