如何使用scale_x_discrete更改x轴标签
scale_x_discrete是ggplot2中的一个函数，用于更改x轴的标签。它可以根据自定义的标签集合来替换默认的x轴标签。
要使用scale_x_discrete函数更改x轴标签，你可以按照以下步骤进行操作：
- 在R语言中安装和加载ggplot2包：你可以使用install.packages("ggplot2")命令安装ggplot2包，并使用library(ggplot2)命令加载该包。
- 创建一个数据集：你可以使用自己的数据集，或者使用ggplot2自带的示例数据集。
- 使用ggplot函数创建一个图形对象：你可以使用ggplot函数来指定数据集和变量，并设置绘图的几何对象类型。例如，你可以使用ggplot(data, aes(x = variable, y = value)) + geom_bar(stat = "identity")来创建一个柱状图。
- 使用scale_x_discrete函数更改x轴标签：在ggplot函数中添加scale_x_discrete函数来更改x轴标签。你可以使用labels参数来指定新的标签集合。例如，你可以使用scale_x_discrete(labels = c("标签1", "标签2", "标签3"))来将x轴标签更改为"标签1"、"标签2"和"标签3"。
以下是一个完整的示例代码：
# 安装和加载ggplot2包
install.packages("ggplot2")
library(ggplot2)
# 创建一个数据集（示例数据集）
data <- data.frame(variable = c("A", "B", "C"), value = c(10, 20, 30))
# 使用ggplot函数创建一个图形对象
plot <- ggplot(data, aes(x = variable, y = value)) + geom_bar(stat = "identity")
# 使用scale_x_discrete函数更改x轴标签
plot <- plot + scale_x_discrete(labels = c("标签1", "标签2", "标签3"))
# 显示图形对象
print(plot)这样，你就可以使用scale_x_discrete函数来更改x轴的标签了。对于更多关于ggplot2和scale_x_discrete函数的详细信息，你可以参考腾讯云的相关产品和产品介绍链接地址。
相关·内容
1回答
我正在绘制x轴上的面和离散数据.如何在不改变基础数据的情况下更改x轴标签？也就是说，阅读"a","b","c","d"的标签应该是"Lab 1","Lab 2","Lab 3","Lab 4"，而不是标签。
df <- data.frame(x = factor(rep(c("a","b","c","d"),4), levels = c("a","b","c&
浏览 1提问于2017-08-18得票数 2
回答已采纳
我想删除ggparcoord图轴上的默认“变量”和“值”标签：
library(GGally)
ggparcoord(data = mtcars,
columns = c(4:5),
groupColumn = 1,
scale = "globalminmax",
alphaLines = 0.2)
我还想删除x轴两端的默认额外空格。如何进行这些自定义轴调整？谢谢!
浏览 0提问于2018-11-26得票数 1
回答已采纳
1回答
我用geom_bar绘制了一项关于引入非本地物种作为害虫控制的调查的响应频率。我正在研究对这个问题的回答因人们居住的地方而异。样本数据。
我想自定义条形图上的x轴标签.然而，在试图指定新的值时，它们要么消失，要么完全移向右边。如果按照下面的方式运行代码，那么x轴将自动填充pest.intro.nonnat值(-2，- 1，0，1，2)，如图1所示。
但是如果我激活了scale_x_discrete()，那么我就失去了任何x轴标签(图2).如果我激活xlim()，那么我就得到了我想要的标签，但是它们被撞到了右边的4个空格(图3)。
有人能帮我把我想要的标签放在合适的地方吗？谢谢!
p + geo
浏览 0提问于2019-08-12得票数 0
回答已采纳
2回答
我正在使用ggplot绘制直方图，其中x变量是分类变量，并且我想要更改x轴刻度标签。下面是我的代码：
from pandas import *
from ggplot import *
df = pandas.read_csv('C:\Users\...csv')
def plot_data(df):
plot = ggplot(data_by_group, aes('x', 'y')) +
geom_histogram(stat='bar') + ggtitle('title'
浏览 2提问于2015-07-07得票数 9
回答已采纳
假设我有一个带有x轴标签的条形图，我想替换它。如何将新的标签值映射到旧的标签值，以确保正确的标签和不错配的标签和条？
在ggplot2中，可以使用scale_x_discrete()中的labels参数编辑x轴标签。通过将带有字符串的向量传递给labels，我们可以控制标签的内容及其顺序。然而，在创建标签向量时，可能会错误地按错误的顺序编写标签，从而以一种可能不被注意到的方式与标签和数据不匹配，但实际上却造成了错误的数字。
是否有办法通过指定哪个新标签与每个旧标签匹配来避免这种危险？
示例
library(ggplot2)
p <- ggplot(PlantGrowth, aes(x
浏览 0提问于2020-08-11得票数 2
回答已采纳
1回答
我有一个数据集，其中x轴是一个日期，但它只是mm(没有年份)。我使用YOY作为组变量，因为我试图在相同的图上显示YOY的变化。X轴标签太拥挤了，我想限制勾标标签，这样就不会显示每个日期。这可能是每隔一天，每三天，每周一天--任何一天都可以。
我尝试过一些解决方案，但无法让它们工作，我假设是因为我的x轴不是日期，而是字符。(在为x轴找到这个mm-dd解决方案之前，我尝试用yyyy格式绘制x轴，但没有找到如何让ggplot2忽略"yyyy“部分的方法。)
举个例子：
myDF <- data.frame(
myDate = format(seq(as.Date(
浏览 4提问于2014-08-13得票数 1
回答已采纳
这个问题以前是以不同的形式提出的，指的是连续变量，而不是离散变量。因此，我认为有理由提出一个新的问题。
我有一个在x轴上的时间点和y轴上的得分的图。
Dose <- rep(c("Time1", "Time2", "Time3", "Time4", "Time5"), 4)
ID <- rep(1:4, each = 5)
set.seed(123)
Score <- rnorm(20, 10, 3)
df <- data.frame(ID, Dose, Score)
p <- gg
浏览 4提问于2016-02-23得票数 0
回答已采纳
我不知道如何将x轴的标签转换为scale_x_reordered()函数？代码scale_x_reordered(breaks=surcharge$arret，labels=surcharge$arret_fr)不工作，出现错误消息。
reorder_within <- function(x, by, within, fun = mean, sep = "___", ...) {
new_x <- paste(x, within, sep = sep)
stats::reorder(new_x, by, FUN = fun)
}
scale_x_reord
浏览 0提问于2019-09-13得票数 2
回答已采纳
我一直在为这件事苦苦挣扎。所以如果有人告诉我解决方案的话我会很感激的。
我们可以使用以下代码绘制数组：
library(ggplot2)
a <- c(1,2,3,4,5)
qplot(seq_along(a), a)
我们还可以在x-值上添加如下标签：
names(a) <- c("a","b","c","d","e")
但是，我无法找到如何在x轴上绘制数组中的变量及其名称。
浏览 4提问于2015-05-21得票数 0
回答已采纳
使用ggplot，我试图
在框图中添加一条水平线。
将样本大小添加到x轴。
我有以下数据集：
Site, Aluminum_Dissolved, Federal_Guideline
M1, 0.1, 0.4
M1, 0.2, 0.4
M1, 0.5, 0.4
M2, 0.6, 0.4
M2, 0.4, 0.4
M2, 0.3, 0.4
增加一条水平线
#Make a boxplot with horizontal error bars
ggplot(ExampleData, aes(x = Site,y = Aluminum_Dissolved))+
stat_boxp
浏览 1提问于2013-05-15得票数 0
回答已采纳
2回答
在R中，我绘制了以下直方图。问题出在X轴上。大多数数据落入区间0，10。很少有X值大于10，尽管最大的值是34。
因此，不是显示0，1，2，...一直到X轴上的34，我会显示0，1，2，...，10，15，20，25，30。换句话说，当X> 10时，仅以5为间隔显示标签，这样标签就不会重叠。
这是我的R代码。如何修改？
d<-read.table("16_prop_s.tsv", header=T, sep="\t")
library(ggplot2)
library(scales)
ggplot(d, aes(x=factor(NRB))
浏览 1提问于2012-08-19得票数 4
回答已采纳
我正在使用coord_flip()制作一个森林地块。
df <- data.frame(f1=factor(rbinom(100, 1, 0.45), label=c("m","w")),
f2=factor(rbinom(100, 1, 0.45), label=c("young","old")),
boxthis1=rnorm(100), boxthis2=rnorm(100), boxthis3=rnorm(100))
ggplot(aes(ymin = boxth
浏览 2提问于2016-08-28得票数 2
回答已采纳
我有下面的图表，但x轴标签太小，无法读取.如果我增加尺寸，它们就会重叠而难以辨认。
但是我得到了一个错误的‘错误的标志’‘通过’论点‘
我还尝试了以下链接
但作为初学者，我不能完全遵循代码，也不确定是否有更复杂的标签是日期。
我在170个样本中有100个基因，+一个“基因”列。然后，我使用以下代码使数据变得很长：
mat_dataNew<-mat_data %>% gather(sample, expression, -Genes)
#log10-transform Counts data
mat_dataNew <- mutate(mat_dataNew, lo
浏览 1提问于2019-03-06得票数 1
我有一个包含csv文件的文件夹，每个文件都有两列数据，例如：
0,red
15.657,red
0,red
0,red
4.429,red
687.172,green
136.758,green
15.189,red
0.152,red
23.539,red
0.348,red
0.17,blue
0.171,red
0,red
61.543,green
0.624,blue
0.259,red
338.714,green
787.223,green
1.511,red
0.422,red
9.08,orange
7.358,orange
25.848,orange
29.28,orange
浏览 0提问于2014-05-09得票数 21
回答已采纳
所以我有这张图：
但是我想在x轴上添加适当的标签，这样每一列都有一个标签。为此，我使用了scale_x_discrete(limit = as.character(2008:2017))，但是这样做会得到以下结果：
如您所见，标签都压在一边，而数据栏则压在另一边。
我做错了什么吗？还是说这是个bug？
下面是我的代码：
# First image
ggplot(data_melt, aes(x = year, y = value, fill = variable)) +
geom_bar(position = "fill", stat = "i
浏览 5提问于2020-05-09得票数 0
回答已采纳
当我创建一个绘图，并将轴标签更改为其他东西，而不是默认(这里，这里，我显示没有。对每个因素水平的观察)
# setup
set.seed(123)
library(ggplot2)
# plot
(p <-
ggplot(mtcars, aes(as.factor(am), wt)) + geom_point() +
scale_x_discrete(labels = c("0\n(n = 19)", "1\n(n = 13)")))
然后旋转标签，轴标签恢复为默认值：
浏览 2提问于2020-08-15得票数 1
回答已采纳
我想在绘图上绘制一个自定义函数，例如：
df <- data.frame(x = seq(1, 20, 0.5), y = jitter(4.5*x, 20))
g <- ggplot(df, aes(x=x, y=y))
g + geom_point() +
stat_function(fun = function(x) 4.5*x)
但是假设我想修改我的x轴标签，如下所示：
g + geom_point() +
scale_x_discrete(breaks = c(1, 10, 20), labels = c("A little", "
浏览 1提问于2016-02-04得票数 1
回答已采纳
这可能是一个expression或call问题，但我试图有条件地格式化单独的轴标签。
在下面的示例中，我想有选择地粗体一个轴标签：
library(ggplot2)
data <- data.frame(labs = c("Oranges", "Apples", "Cucumbers"), counts = c(5, 10, 12))
ggplot(data = data) +
geom_bar(aes(x = labs, y = counts), stat="identity")`
也有类似的问题，但是
浏览 5提问于2015-05-04得票数 11
回答已采纳
2回答
我在ggplot中制作了一个图，其中x轴标签包含不同蛋白质的名称，我遇到了麻烦，因为其中一些名称太长，标签变得太大，以至于很难看到图。
有没有什么方法可以减少x轴标签中的字符数，而不是“打印”更大的图形？
下面的例子说明了我的问题：
library(ggplot2)
dat <- mtcars
# Make the x-axis labels very long for this example
dat$car <- paste0(rownames(mtcars),rownames(mtcars),rownames(mtcars),rownames(mtcars))
ggplot
浏览 8提问于2013-07-25得票数 7
回答已采纳
我正在寻找一种方法，在x轴上使用长变量名。当然，我可以使用较小的字体或旋转他们一点，但我想保持他们的垂直和可读性。
例如：
df <- data.frame(a=LETTERS[1:20], b=rnorm(20), c=rnorm(20), d=rnorm(20))
df_M <- melt(df, id="a")
plot <- ggplot(data=df_M,
aes(x=variable, y=a, fill=value)) +
geom_tile() +
scale_fil
浏览 3提问于2013-11-21得票数 35
回答已采纳
2回答
我想在toupper的aes调用中调用ggplot2。例如，使用PlantGrowth，我希望将变量group更改为所有大写。我已经能够将x标签更改为所有大写，但是x轴标题出现了一个奇怪的标题。我可以手动删除x轴标题，但似乎有更简单的方法。
编辑1:我应该说我不想改变数据中的数据，即d$group <- toupper(d$group)。相反，如果可能的话，我想更改aes语句中的标签。
library (ggplot2)
d <- PlantGrowth
p <- ggplot () + geom_bar (data=d, aes(toupper(x=group),y=wei
浏览 3提问于2014-09-10得票数 1
回答已采纳
如何将轴标签添加到ggcorrplot？我有一张问卷调查中两次不同尝试之间的相关性图。X轴表示第一次尝试，Y轴表示第二次尝试。我想标记这些轴，以表明这就是这里所表示的。 我的代码如下所示： corrQData <- round(cor(Attempt1, Attempt2), digits = 1)
ggcorrplot(corrQData,
outline.color = "white",
ggtheme = theme_bw(),
colors = c("#F8696B",
浏览 29提问于2019-08-31得票数 1
回答已采纳
1回答
如果我使用ggplot正常绘图，我将按顺序获得x轴标签(图1)。我不想要字母顺序，所以我使用交互。图看起来和预期的一样，但是在x轴上显示的信息太多了(图2)。有没有其他不使用交互和x轴标签而不按字母顺序进行绘图的方法？谢谢。
Figure 1
Figure 2
我只想在x轴上显示"item“而不是"type.item”。下面是简单的代码和数据。
library("ggplot2")
library("plyr")
df<-data.frame(
浏览 0提问于2018-10-10得票数 1
1回答
我正在制作一个条形图与长轴标签，我需要包装和正确对齐。唯一复杂的是，我需要添加一个表达式才有上标。
library(ggplot2)
library(scales)
df <- data.frame("levs" = c("a long label i want to wrap",
"another also long label"),
"vals" = c(1,2))
p <- ggplot(df, aes(x = levs
浏览 0提问于2019-03-16得票数 3
回答已采纳
我知道这方面有很多问题，但我发现的那些问题似乎并没有为我做任何工作。在X轴上有一个范畴变量，在Y轴上有一个连续变量。
我试图在图例(或图的上角)中添加geom_point中使用的点数总数，并在其轴标签下为每个类别添加一个点数。这是我用一个示例数据编写的ggplot代码：
ds <- data.frame(groupage = sample(c(1,2,3),2000, replace=TRUE), moneyearned = sample(20,replace = TRUE))
p<- ggplot(ds, aes(x=groupage, y=moneyearned)) +geom
浏览 3提问于2016-03-03得票数 1
回答已采纳
1回答
使用ggplot，我可以使用scale_x_discrete函数错开x轴标签。
library(tidyverse)
tibble(A = factor(LETTERS[1:5]), B = c(abs(rnorm(5)))) %>%
ggplot(aes(x=A, y=B))+
geom_bar(stat="identity")+
scale_x_discrete(guide = guide_axis(n.dodge = 2))
但是，我希望在R环境中进行同样的编程(即。不使用ggplotly包装器函数)。有人知道我应该使用什么功能吗？
浏览 2提问于2022-09-07得票数 1
我试图手动标记我的x轴，但是当我把我的图解和释放我的x轴的比例时，标签就变得不正确了。我想知道是否有防止这种情况，而不必事先手动更改我的字符串。
当我使用scale_x_discrete()手动标注x轴时，标签是正确的。
library(tidyverse)
df <- data.frame(trial = rep(c("a", "b", "c"), each = 30),
values = rnorm(n = 90, mean = 0, sd = 1),
variabl
浏览 2提问于2020-11-24得票数 2
回答已采纳
1回答
我在试着做一个等级曲线。这是头
head(rank)
species ab rank
792 PEGR2 462.10 792
1126 COUM 269.70 1126
1314 KRGR 207.04 1314
1439 KRER 177.11 1439
1446 PEBR 176.00 1446
1623 CAMI12 140.71 1623
等级从792-8538不等，没有任何离散的模式。我只是试图用y轴在x轴上绘制秩，但我不能让它不仅显示所有的秩，而不是分解它，我不知道是因为x轴没有一个模式，还是因为我不得不重新排序它。
X轴为数值
浏览 3提问于2021-04-28得票数 1
回答已采纳
1回答
大家好，感谢你们的关心，
这样做的目的是在有很多很多x轴标签的情况下提供更多的空间。注我并不关心标签本身是否显示在图上(我已经在下面的代码中排除了它们)。我想要改变的是，当一个典型的geom_point绘图中有大约1000个x轴标签和1000个数据点时，与第一个和最后几个x轴标签相关的最左边和最右边的点被压碎在绘图区的边缘上。我想填充一些空间，这样这些点就不会受到太多的挤压。
我想知道是否有一种方法可以在xi和xii不是数字而是字符串的情况下改变scale-x-discrete(limits=c(xi,xii))命令的类型。有两个例子可以(希望)清楚地说明这一点：
在第一种情况下，最右边的点和
浏览 0提问于2017-05-26得票数 4
1回答
我试着在这个图表中给我的个人盒子贴上“Cong”的标签。和“Incong”我从df "flanker.Summary.ID.RT“中提取，并使用此df”类型“中的列表示盒图x轴，使用列"Flanker.RT”表示盒图y轴。我目前正在尝试以下代码：
flanker.A.1 <- ggplot() +
geom_line(data=flanker.Summary.ID.RT, aes(x=Type, y=Flanker.RT, group=ID),scale_x_discrete(labels=c("Cong.","Incong.")),
浏览 2提问于2021-04-21得票数 0
回答已采纳
我正在尝试创建一个旋转的条形图，其名称在Y轴上，值(-0.5，0，0.5)在X轴上。我有酒吧工作，但当我试图添加scale_x_discrete Y轴标签消失。我做错了什么？
dtm <- data.frame(
month = factor(c("Police","Country","Rules")),
value = c(-.51,-.1,.9)
)
dtm$colour <- ifelse(dtm$value < 0, "firebrick1","steelblue")
ggpl
浏览 3提问于2017-09-27得票数 0
回答已采纳
1回答
我正在绘制一些数据，希望在我的绘图图的x轴上有勾号。我的数据看起来是：
publication labels percentage
1 foo 0 .4572
2 foo 1 .0341
3 foo 2 .09478
4 foo 3 .0135
5 bar 0 .7442
6 bar 1 .2847
每个名称都有从0到9的标签。
我的代码看起来是：
ggplot(aes(y = percent
浏览 1提问于2017-08-08得票数 3
回答已采纳
我有以下数据集
# A tibble: 11 x 3
Anio Porc_PBI
<dbl> <chr> <dbl>
1 2008 BPS 6.42
2 2009 BPS 6.52
3 2010 BPS 6.98
4 2011 BPS 6.93
5 2012 BPS 7.88
6 2013 BPS 7.93
7 2014 BPS 7.97
8 2015 BPS 8.26
9 2016 BPS 8.
浏览 2提问于2020-04-18得票数 0
1回答
我正在结合使用geom_point和position_dodge来绘制点，并将它们在水平轴上展开一点。问题是一个基准测试的点与另一个基准测试的点太接近了(例如atax和bicg)。
当X轴是绝对的时，如何增加X轴上记号之间的距离？或者我如何防止不同基准的点相互接触。
下面是我用来在上生成图形的代码
ggplot(data = df, aes(x = Benchmark, y = time, shape = type)) +
theme_light() +
theme(axis.text.x = element_text(angle = 45, hjust = 1)) +
浏览 11提问于2019-07-18得票数 1
2回答
我试图用x轴作为年龄，y轴作为0或1(真或假)的直方图。
person = c(1:50)
age = sample(1:5,50,replace=T)
drunk = sample(0:1,50,replace=T)
df = data.frame(person,age,drunk)
#plots that I tried:
ggplot(df, aes(x = age, y = drunk)) +
geom_bar(stat="identity")
hist(df$age)
barplot(df$drunk, names.arg=df$age)
这些阴谋对我没用
浏览 4提问于2016-11-26得票数 0
回答已采纳
1回答
我正在用ggplot2制作一个条形图。守则如下：
ggplot(rt5, aes(x = reorder(Retweet, -Freq), y = Freq, fill = Retweet)) + geom_bar(stat = "identity") +
xlab("Top 5 Retweets of KKRiders") +
ggtitle("Top 5 Retweets of KKRiders \n first three days") + coord_flip() +
scale_x_di
浏览 5提问于2015-04-12得票数 0
回答已采纳
3回答
我有一个像这样的ggplot。
p2=ggplot(data=data1, aes(x=ID, y = value)) +
geom_line(group=1,color='steelblue', size=2) + facet_wrap(~variable)+theme_economist()
p2=p2+theme(text = element_text(size=10), axis.text.x = element_text(angle=90, hjust=1))
p2
问题是，我在X轴上得到了重叠的X标签。有没有办法获得不重叠的X轴标签。
浏览 1提问于2017-03-05得票数 1
我正在努力使用ggplot2创建条形图，在条形图中我尝试在条形图的顶部添加y值，但不移动x轴的标签。geom_text可以很好地在条上添加值，但当旋转45˚(即标签的最后一个字母粘在轴上)时，我无法正确调整x轴标签。
我的数据
dput(graph)
structure(list(x = structure(1:9, .Label = c("AAAAAAAAAAAAA",
"BBBBBBBB", "CCCCCCCCCCCCCCCC", "DDDDD", "EEEEEEEE", "FFFFFFF"
浏览 1提问于2013-02-16得票数 2
回答已采纳
1回答
我正在为下列数据创建时间序列图：
# Creating data set
year <- c(rep(2018,4), rep(2019,4), rep(2020,4))
month_1 <- c(2, 3, 7, 8, 6, 10, 11, 12, 5, 7, 8, 12)
avg_dlt_calc <- c(10, 20, 11, 21, 13, 7, 10, 15, 9, 14, 16, 32)
data_to_plot <- data.frame(cbind(year,month_1,avg_dlt_calc ))
ggplot(data
浏览 8提问于2021-03-11得票数 1
回答已采纳
1回答
我正在尝试向一些x轴值添加一个上标，以便连接到位于页面底部的脚注。简单的变通方法是用星号代替^a，但这对我的目的不起作用。
我做了很多搜索，虽然有很多关于轴标签中上标的帖子，但我找不到任何关于轴值中上标的帖子。他们中的大多数似乎在centera轮添加一个gg + labs(x = expression("blah^a"))。
我确实找到了一篇关于解析geom_text()中的上标的文章，但它似乎同样不适用于geom_bar()。
以下是一些测试数据：
library(ggplot2)
dat <- data.frame(x = c("alpha", &#
浏览 2提问于2018-08-27得票数 1
回答已采纳
1回答
R中重叠的轴标签
、、
我有一个问题，我有重叠的轴标签，似乎无法获得解决方案来解决这个问题。
p <- ggplot(data=Data,aes(x=Indicator,y=Numeric,group=Expenditure_group,shape=Expenditure_group,colour=Expenditure_group))+geom_point()+geom_line()
有没有办法解决这个问题，这样就不会有重叠？
浏览 1提问于2013-10-24得票数 10
回答已采纳
4回答
显示大于号或等号
、、
我有一个图，它是这样生成的：
ggplot(dt.2, aes(x=AgeGroup, y=Prevalence)) +
geom_errorbar(aes(ymin=lower, ymax=upper), colour="black", width=.2) +
geom_point(size=2, colour="Red")
我像这样控制x轴标签：
scale_x_discrete(labels=c("0-29","30-49","50-64","65-79",">
浏览 0提问于2012-11-02得票数 43
回答已采纳
2回答
我想知道如何在我的x轴记号标签中加一个下标。而不是在轴标签中，因为在大多数其他帖子中，因此来自数据框中已有的值。
这是一个可重现的代码示例，我希望括号中的字母是下标。
p_t<- c(rep("FW - P[H]",3),rep("FW - P[L]",3),rep("FW - F",3),rep("FW - SSWB",3),rep("C - F",3),rep("C - P[L]",3),rep("C - P[H]",3))
s_t<-rep(c("A"
浏览 58提问于2020-07-31得票数 1
回答已采纳
我正在尝试使用facet_wrap绘制一个ggplot盒子图来显示两个站点。我的x轴有三种可能的处理方式:控制、袋装或分散。为了删除facet_wrap中的空列，我使用了facet_wrap(~site, scales = "free_x")，因为每个站点都包含一个控件，并且要么打包，要么分散。我还想将我的轴标签从'A_Control‘改为'Control’等，所以我使用了scale_x_discrete(labels = c('Control','Bagged','Scattered'))。然而，我的问题是，当
浏览 39提问于2020-11-11得票数 0
回答已采纳
我试图绘制一个x轴是离散的，但不是按字母顺序排序的图。 我有一个data.frame： df <- data.frame(x1=factor(c('z1', 'z2', 'z1', 'z2'), levels=c('z3','z2', 'z1')),
x2=factor(c('z1', 'z1', 'z2', 'z3'), levels=c('z3','z
浏览 73提问于2019-06-15得票数 4
回答已采纳
2回答
我希望使用ggplot2绘制一个heatmap，并且希望自定义x轴标记-位置、文本和角度。
以下是我的示例数据：
set.seed(1)
df <- reshape2::melt(matrix(rnorm(100*20),100,20,dimnames = list(paste0("G",1:100),paste0("S",1:20))))
我希望x轴刻度只有一个刻度值，位于轴范围- 10的中间，标签为："X-Label"，角度为90度。此外，我不想要x轴标题。
这是我正在尝试的：
library(ggplot2)
ggplot(data=
浏览 3提问于2018-11-14得票数 2
我试图做一个分面的ggplot2图错误条，但失败。数据就像这样。
library(ggplot2)
library(dplyr)
df0 <- iris %>%
group_by(Species) %>%
mutate(long_sepal = ifelse(Sepal.Length > mean(Sepal.Length),
yes = "long", no = "short")) %>%
group_by(Species, long_sepal) %>%
mutate(petal_ra
浏览 2提问于2016-03-14得票数 1
回答已采纳
在ggplot中，我经常需要编辑x轴标签。我通常的例程是为标签创建一个附加的命名向量(例如my_labels)，然后使用scale_x_labels(labels = my_labels)。
特别是，当需要将标签转换成不同的语言时，这种方法非常有用。然而，当试图用从右到左的语言包装标签文本时，这是不正确的.
示例
1 --一个简单的酒吧情节
library(dplyr)
library(ggplot2)
mpg %>%
filter(class == 'pickup' | class == "suv" | class == "compact&
浏览 1提问于2021-01-13得票数 1
回答已采纳
如何根据一个data.frame列中一个因子的级别的重合顺序对另一个因子的级别进行排序？
例如，在代码中：
require(RJSONIO)
require(ggplot2)
race.data.json=fromJSON('http://ergast.com/api/f1/2011/constructors/mclaren/results.json?limit=50')
pd=function(rd,df=NULL) {
for (el in rd$MRData$RaceTable$Races)
for (el2 in el$Results){
浏览 0提问于2012-03-07得票数 1
回答已采纳
1回答
我想要自动设置一个离散变量的轴的断点的数目和位置，这样所绘制的标签实际上是可读的。
例如，在下面的代码中，生成的绘图应该只显示标签/x变量的一部分。
ggData <- data.frame(x=paste0('B',1:100), y=rnorm(100))
ggplot(ggData, aes_string('x', 'y')) +
geom_point(size=2.5, shape=19, na.rm = TRUE)
到目前为止，我尝试使用pretty和pretty_breaks，但是它们并不适用于离散变量。
浏览 3提问于2015-09-02得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
