मैं सोच रहा था कि क्या आर-प्लॉट ग्राफ में, एक्स-अक्ष या वाई-एक्सिस या तो धुरी मूल्यों से छुटकारा पाने का एक तरीका है।
मुझे पता है कि axes = false
पूरी धुरी से छुटकारा मिल जाएगा, लेकिन मैं केवल नंबरिंग से छुटकारा पाना चाहूंगा।
मैं सोच रहा था कि क्या आर-प्लॉट ग्राफ में, एक्स-अक्ष या वाई-एक्सिस या तो धुरी मूल्यों से छुटकारा पाने का एक तरीका है।
मुझे पता है कि axes = false
पूरी धुरी से छुटकारा मिल जाएगा, लेकिन मैं केवल नंबरिंग से छुटकारा पाना चाहूंगा।
जवाबों:
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)
बेस ग्राफिक्स का उपयोग करना, ऐसा करने का मानक तरीका कुल्हाड़ियों = 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))
@ रिची कॉटन का ऊपर बहुत अच्छा जवाब है। मैं केवल यह जोड़ सकता हूं कि यह पृष्ठ कुछ उदाहरण प्रदान करता है। निम्नलिखित प्रयास करें:
x <- 1:20
y <- runif(20)
plot(x,y,xaxt = "n")
axis(side = 1, at = x, labels = FALSE, tck = -0.01)
आप प्लॉट के अंदर लेबल भी लगा सकते हैं:
plot(spline(sub$day, sub$counts), type ='l', labels = FALSE)
आपको एक चेतावनी मिलेगी। मुझे लगता है कि यह इसलिए है क्योंकि लेबल वास्तव में एक पैरामीटर है जो एक सबरूटीन को पारित किया जा रहा है जो प्लॉट चलाता है (कुल्हाड़ियों?)। चेतावनी पॉप अप हो जाएगी क्योंकि यह सीधे प्लॉट फ़ंक्शन का पैरामीटर नहीं था।
पृष्ठभूमि से मिलान करने के लिए 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)