我正在努力制作圖表，使用ggplot2. 下面，您可以看到我得到的輸出和相關代碼：
library(ggplot2)
## Defining Dataframe
Dati <- data.frame(Correction = c("0%", " 5%", " 10%", " 15%"),
Vix = c(65700, 48000, 45500, 37800))
## Create factors
Dati$Correction <- as.factor(Dati$Correction)
Dati$Correction <- factor(Dati$Correction, levels = c("0%", " 5%", " 10%", " 15%"))
## Defining graph
Graph <- ggplot(data=Dati, aes(x=Correction, y=Vix)) geom_point(color = "#e60000", shape = 1, size = 3.5)
geom_smooth(aes(as.numeric(Correction), Vix), level=0.75, span = 1, color = "#e60000", method=lm)
xlab("xlab") ylab("y lab") labs(color='')
guides(color = FALSE, size = FALSE)
Graph
我想要的是設定限制，也許有scale_x_discrete()但我沒有成功，以便洗掉行前后的外部空間：
有可能以某種方式做嗎？我也想這樣做，以防在 x 軸上顯示文本值。
提前感謝您的每一次最終幫助。
uj5u.com熱心網友回復：
您應該expand在scale_x_discrete函式中設定一個。這將改變離散 x 軸的限制。您可以將其更改為您想要的。您可以使用以下代碼：
## Defining graph
Graph <- ggplot(data=Dati, aes(x=Correction, y=Vix)) geom_point(color = "#e60000", shape = 1, size = 3.5)
geom_smooth(aes(as.numeric(Correction), Vix), level=0.75, span = 1, color = "#e60000", method=lm)
xlab("xlab") ylab("y lab") labs(color='')
guides(color = FALSE, size = FALSE)
scale_x_discrete(expand=c(0.05, 0))
Graph
輸出：
uj5u.com熱心網友回復：
x 軸是一個連續變數，因此您需要使用scale_x_continuous(). 要洗掉刻度上的填充，請設定scale_x_continuous(expand = c(0, 0))
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/447556.html