2011-01-18 19 views

उत्तर

8

आरपीएनल पैकेज ने मेरे लिए काम किया है।

library(rpanel)  

lvm.draw <- function(panel) {  
    x=0:20  
    plot(x, panel$int + (panel$slo*x), ylim=panel$data, ylab="y", main="Adam's Super Duper Interactive Graph", typ="l", lwd=3, col="red")  
    grid()  
    panel  
}  

ylimdat<-c(-50,50)  
panel <- rp.control(title = "Adam's Panel", data=ylimdat, slo=0.5, int=1.0, size=c(300, 160))  
rp.slider(panel, var=slo, from=-5, to=5, action=lvm.draw, title="Slope", pos=c(5, 5, 290, 70), showvalue=TRUE)  
rp.slider(panel, var=int, from=-50, to=50, action=lvm.draw, title="Intercept", pos=c(5, 70, 290, 90), showvalue=TRUE)  
+0

'rpanel' का उपयोग करके एक और उदाहरण यहां दिया गया है: http://revgr.com/2012/12/11/interactive-graphs-using-r/ –

2

TeachingDemos पैकेज में tkexamp फ़ंक्शन आपको साजिश में विभिन्न विकल्पों को बदलने के लिए नियंत्रण के साथ ग्राफ बनाने में मदद करता है, सहायता पृष्ठ पर कई उदाहरण हैं जो यह देखने के लिए चलाया जा सकता है कि यह कैसे काम करता है।

उसी पैकेज में TkIdentify फ़ंक्शन आपको लेबल को खींचने की अनुमति देता है (बिंदुओं से लेकर लेबल तक इंगित लाइनों के साथ) वांछित स्थिति में, आप उस फ़ंक्शन से कोड (सभी आर, कुछ भी संकलित नहीं) के आधार पर शुरू कर सकते हैं अपनी गतिशील साजिश के लिए जो एक रेखा खींचने की अनुमति देगा।

11

latticist और playwith आर के सांख्यिकीय भूखंडों के लिए इंटरैक्टिव कार्यक्षमता की पेशकश कर रहे हैं।

विशिष्ट विवरण संशोधित करने के लिए आप एसवीजी प्रारूप में ग्राफ को सहेज सकते हैं और इसे इंकस्केप में संपादित कर सकते हैं।

संबंधित मुद्दे