प्लॉट अक्ष मान निकालें


153

मैं सोच रहा था कि क्या आर-प्लॉट ग्राफ में, एक्स-अक्ष या वाई-एक्सिस या तो धुरी मूल्यों से छुटकारा पाने का एक तरीका है।

मुझे पता है कि axes = falseपूरी धुरी से छुटकारा मिल जाएगा, लेकिन मैं केवल नंबरिंग से छुटकारा पाना चाहूंगा।

जवाबों:


195

X- अक्ष या y- अक्ष पर क्रमांकन निकालें:

plot(1:10, xaxt='n')
plot(1:10, yaxt='n')

यदि आप लेबल को भी हटाना चाहते हैं:

plot(1:10, xaxt='n', ann=FALSE)
plot(1:10, yaxt='n', ann=FALSE)

3
लेकिन ध्यान रखें कि ये पूरी धुरी को हटा देते हैं ... वहाँ कुछ भी नहीं होगा जब तक कि आप एक बिट्टी सेटिंग का उपयोग नहीं करते हैं जो आपके अक्षों की रेखाएं बनाती हैं। डिफ़ॉल्ट बाइट = 'ओ' है और इसलिए आमतौर पर प्लॉट के चारों ओर एक बॉक्स होगा जहां कुल्हाड़ियां होंगी। लेकिन एक bty = 'n' के साथ अंतरिक्ष में तैरने वाले बिंदु होंगे।
जॉन

66

बेस ग्राफिक्स का उपयोग करना, ऐसा करने का मानक तरीका कुल्हाड़ियों = FALSE का उपयोग करना है, फिर एक्सिस (या अक्ष) का उपयोग करके अपने स्वयं के कुल्हाड़ियों का निर्माण करें। उदाहरण के लिए,

x <- 1:20
y <- runif(20)
plot(x, y, axes=FALSE, frame.plot=TRUE)
Axis(side=1, labels=FALSE)
Axis(side=2, labels=FALSE)

जाली बराबर है

library(lattice)
xyplot(y ~ x, scales=list(alternating=0))

प्लस एक जाली स्पष्टीकरण के लिए!
ज़ुर्बर्ब

19

@ रिची कॉटन का ऊपर बहुत अच्छा जवाब है। मैं केवल यह जोड़ सकता हूं कि यह पृष्ठ कुछ उदाहरण प्रदान करता है। निम्नलिखित प्रयास करें:

x <- 1:20
y <- runif(20)
plot(x,y,xaxt = "n")
axis(side = 1, at = x, labels = FALSE, tck = -0.01)

10

आप प्लॉट के अंदर लेबल भी लगा सकते हैं:

plot(spline(sub$day, sub$counts), type ='l', labels = FALSE)

आपको एक चेतावनी मिलेगी। मुझे लगता है कि यह इसलिए है क्योंकि लेबल वास्तव में एक पैरामीटर है जो एक सबरूटीन को पारित किया जा रहा है जो प्लॉट चलाता है (कुल्हाड़ियों?)। चेतावनी पॉप अप हो जाएगी क्योंकि यह सीधे प्लॉट फ़ंक्शन का पैरामीटर नहीं था।


1

पृष्ठभूमि से मिलान करने के लिए ax_colour बदलें और यदि आप पृष्ठभूमि को गतिशील रूप से संशोधित कर रहे हैं तो आपको ax_colour को एक साथ अपडेट करने की आवश्यकता होगी। * साझा चित्र मॉक डेटा () का उपयोग करके ग्राफ / प्लॉट उदाहरण दिखाता है

### Main Plotting Function ###
plotXY <- function(time, value){

    ### Plot Style Settings ###

    ### default bg is white, set it the same as the axis-colour 
    background <- "white"

    ### default col.axis is black, set it the same as the background to match
    axis_colour <- "white"

    plot_title <- "Graph it!"
    xlabel <- "Time"
    ylabel <- "Value"
    label_colour <- "black"
    label_scale <- 2
    axis_scale <- 2
    symbol_scale <- 2
    title_scale <- 2
    subtitle_scale <- 2
    # point style 16 is a black dot
    point <- 16 
    # p - points, l - line, b - both
    plot_type <- "b"

    plot(time, value, main=plot_title, cex=symbol_scale, cex.lab=label_scale, cex.axis=axis_scale, cex.main=title_scale, cex.sub=subtitle_scale, xlab=xlabel, ylab=ylabel, col.lab=label_colour, col.axis=axis_colour, bg=background, pch=point, type=plot_type)
}

plotXY(time, value)

यहाँ छवि विवरण दर्ज करें

हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.