在ggplot2中手动向x和y轴添加断点
在ggplot2中，可以使用scale_x_continuous()和scale_y_continuous()函数来手动向x轴和y轴添加断点。
添加断点可以用于突出数据的特定范围或者在图表中显示不连续的数据。下面是如何在ggplot2中手动添加断点的步骤：
- 首先，创建一个基本的ggplot对象，例如：
library(ggplot2)
data <- data.frame(x = c(1, 2, 3, 4, 5), y = c(10, 20, 30, 40, 50))
p <- ggplot(data, aes(x, y)) + geom_point()- 使用
scale_x_continuous()函数来添加x轴的断点。该函数接受breaks参数，用于指定断点的位置。例如，如果要在x轴上添加断点2和4，可以使用以下代码：
p <- p + scale_x_continuous(breaks = c(2, 4))- 使用
scale_y_continuous()函数来添加y轴的断点。同样，该函数接受breaks参数，用于指定断点的位置。例如，如果要在y轴上添加断点20和40，可以使用以下代码：
p <- p + scale_y_continuous(breaks = c(20, 40))- 最后，使用
p对象来绘制图表：
print(p)这样就可以在ggplot2图表中手动添加x轴和y轴的断点了。
在腾讯云的产品中，与数据处理和可视化相关的产品是腾讯云数据智能（TI-DB），它提供了一站式的数据处理和分析解决方案。您可以通过以下链接了解更多关于腾讯云数据智能的信息：腾讯云数据智能
请注意，以上答案仅供参考，具体的产品选择和链接地址可能需要根据实际情况进行调整。
相关·内容
我想把
一个y轴的平方尺和
设定y轴限值。
问题是，scale_y_sqrt( limits = c(0,10))导致y轴丢失了第一个断点(0).
我如何重写它以获得所需的结果？
最小示例的R代码：
library(ggplot2)
library(grid)
library(gridExtra)
N <- 10
test_data <- data.frame(
idx <- 1:N,
vals <- runif( N, min = 0, max = 10)
)
grid.arrange(
ggplot( test_data, aes(
浏览 4提问于2014-07-16得票数 1
回答已采纳
我在网上看到，用ggplot2绘制的绘图中字体的大小相对于theme()中指定的base_size大小。
我还发现，可以通过执行以下操作来修改特定元素的大小：
theme(axis.title.y = element_text(size = rel(1.5) )
我正在使用theme_bw()，并希望在我的情节中的所有文本:轴的标签，图例的标题，图例中的项目，轴上的断点，字体大小相同。这是如何做到的呢？
编辑：
我(几乎)实现了我想要的，使用theme_tufte()作为建议@律师。
g + theme_tufte() + theme(axis.rect=element_line() )
给我
浏览 3提问于2015-07-14得票数 1
回答已采纳
是否可以使用ggplot2将断点和标签手动添加到次要y轴？
(见右下角)
我希望在右边的y轴上有更紧凑的中断，代表条形图。
浏览 2提问于2017-09-04得票数 6
回答已采纳
在ggplot2中，我希望在主题中添加一些轴偏好(通常是断点和标题)，以便在生成类似图时具有较少的重复代码。我尝试过以下方法，但是由于scale_x_continuous不返回主题对象，所以它无法工作。有办法让它起作用吗？
theme_set(theme_get() +
scale_x_continuous('this is x',breaks=seq(0,10,by=2)))
ggplot(mpg,aes(x=displ,y=year))+geom_point()
浏览 0提问于2014-08-12得票数 0
回答已采纳
问题
我试图了解如何手动将y轴断点提供给由facet_wrap()在ggplot2中R中生成的方面。
最小可重现性示例
免责声明:我从借用了以下示例
使用下面的代码，您可以根据de dataset中的y轴值指定y轴断点。
library(ggplot2)
diamonds2 <- subset(diamonds, !(cut == "Fair" & price > 5000))
my_breaks <- function(x) { if (max(x) < 6000) seq(0, 5000, 1000) else seq(0, 15000,
浏览 2提问于2020-02-21得票数 2
回答已采纳
我非常感谢任何人帮我解决这个问题。它似乎应该是如此简单，但经过许多小时的实验，我不得不停下来寻求帮助。非常感谢您提前！
问题摘要：
如何在ggplot2中确保直方图的y轴只使用整数(频率计数值)而不是小数标记？
迄今尝试的函数、参数和数据类型更改包括：
geom_histogram()、geom_bar()和geom(col) --在每种情况下，包括或不包括相关的论点stat = "identity"。
添加+ scale_y_discrete()，有或没有+ scale_x_discrete()
将基础计数数据转换为因数和/或将bin数据转换为因数
理想情
浏览 5提问于2021-04-28得票数 2
回答已采纳
从ggplot2手册中获取一个简单的绘图
p <- ggplot(mtcars, aes(x = wt, y=mpg)) + geom_point()
p + geom_hline(yintercept=20)
如广告所示，我得到了一条价值20的水平线。
有没有办法限制这条线在x轴上的范围，让我们的say2 -4范围？
浏览 1提问于2014-08-29得票数 13
回答已采纳
到目前为止，我错过了y轴上带有分数的直方图函数。如下所示：
require(ggplot2)
data(diamonds)
idealD <- diamonds[diamonds[,"cut"]=="Ideal",]
fracHist <- function(x){
frac <- (hist(x,plot=F)$counts) / (sum(hist(x,plot=F)$counts))
barplot(frac)
}
### call
fracHist(idealD$carat)
它不是很漂亮，但基本上可以解释我想要什么:
浏览 2提问于2011-10-17得票数 5
回答已采纳
1回答
我正在使用命令scale_x_break来设置一个轴断点。但是，当前代码在轴断裂后的“极值”部分中有太多的勾号。该命令包含一个参数ticklabels，但是由于某种原因，我不能使用它来更改“极端”勾标，即-1000、-1010、-1020、-1030、-1040和-1050。但是，该命令在轴断裂之前添加/移除勾标时工作得很好。例如:代码ticklabels = c(-5, -1015)的部分为-5添加了一个勾标，并在轴断裂之前移除所有其他的勾标，但在轴断裂后不添加-1015或删除任何勾标。
理想情况下，“极限”面板将有3个勾号：-1000，-1025和-1050。
library(ggplot
浏览 3提问于2022-03-09得票数 0
回答已采纳
我正在处理一个图，其中的轴断裂包括整数和非整数数字。为了说明起见，请考虑以下示例：
library(ggplot2)
ggplot() + geom_point(aes(x = 0:10, y = 0:10)) +
scale_x_continuous(breaks = seq(0, 10, 2.5)) +
scale_y_continuous(breaks = seq(0, 10, 2.5))
但是，我希望整数(0、5和10)在没有零小数点的情况下出现，同时我仍然希望保留非整数(2.5和7.5)。考虑到上面的例子，我希望轴断点显示为：0, 2.
浏览 2提问于2016-11-22得票数 1
回答已采纳
使用diamonds，我想把carat和price画成4级(Fair、Good、Very Good和Premimum)的cut。
我没有允许facet_wrap()控制轴中的断点，而是绘制了四个图来控制轴上的断点。
library(ggplot2)
library(egg)
library(grid)
f1 <-
ggplot(diamonds[diamonds$cut=="Fair",], aes(carat, price))+
geom_point()+
facet_wrap(~cut, ncol =2)+
scale_x_continuous(limi
浏览 10提问于2016-08-18得票数 6
回答已采纳
1回答
我目前有一幅图，并使用facet_zoom来集中注意x轴中0到10之间的记录。下面的代码复制了一个示例：
require(ggplot2)
require(ggforce)
require(dplyr)
x <- rnorm(10000, 50, 25)
y <- rexp(10000)
data <- data.frame(x, y)
ggplot(data, aes(x = x, y = y)) +
geom_point() +
facet_zoom(x = dplyr::between(x, 0, 10))
我希望将图的缩放部分的断点更改为等效于：
ggplo
浏览 0提问于2018-11-19得票数 2
2回答
我有一个散点图，其中y轴缩放在某一点上发生变化，用一些极值来绘制数据。我试图在y轴上添加某种视觉提示，这表明缩放在点上发生了变化。
下面是一个情节的例子
library(scales)
library(ggplot2)
set.seed(104)
ggdata <- data.frame('x' = rep('a',100),
'y' = c(runif(90, 0, 20), runif(10, 90, 100)))
transformation <- trans_new(
浏览 3提问于2020-04-21得票数 5
回答已采纳
我只是试图标记每个x轴的最大和最小在一个分面的图形。我有几个方面，有不同的x尺度和相同的y尺度，和x轴刻度标签互相重叠。与其手动确定每个面x轴的限值和断点，我还在寻找一种方法来标记每个方面的最小值和最大值。
使用CO2数据集示例数据的代码(参见?CO2)：
CO2$num <- 1:nrow(CO2)
library(reshape2)
CO2.melt <- melt(CO2,
id.var=c("Type",
"Plant",
浏览 2提问于2016-03-10得票数 4
回答已采纳
我正在尝试使用ggplot创建一个POSIXct时间图，并且想要反转轴，但我正在努力使它工作。我一直在使用scale_y_datetime，因为在我的实际应用程序中，控制这个轴上的断点是很重要的。
这是我的问题的一个例子，首先用正常的顺序，然后我试图扭转轴。
# Some random dates and values to plot
MyData <-
structure(list(Date = structure(c(1492979809.99827, 1492602845.68722,
1493093428.90318, 1492605578.0691, 14929613
浏览 3提问于2017-04-26得票数 17
回答已采纳
我试图将geom_line()图的方向从左到右(沿x轴)更改为自上而下(沿y轴)，但是它不起作用。
ggplot(economics, aes(unemploy, date)) + geom_line(orientation = "y")
根据这个页面上的第三个例子()，这应该给我想要的情节。
我只得到以下的错误和沿x轴的线图。
Warning: Ignoring unknown parameters: orientation
不幸的是，我使用的是ggplot2版本3.2.1，更新到较新版本的ggplot2并不是一个真正的选择。(根据文档，定向参数也应该在3.2.1中起作用)
浏览 3提问于2020-07-30得票数 0
回答已采纳
下面的最小示例在很小程度上再现了这个问题.我注意到失真取决于数据堆积的数量，而如果没有堆叠的数据，则不存在混叠/失真。Y轴刻度文本从不仅影响x轴刻度文本.X轴勾选文本之间的颜色/大胆性差异也非常明显。
library(ggplot2)
x <- c(1111, 2222, 3333, 1111, 1111, 3333, 3333, 1111, 3333, 1111, 2222, 1111, 3333, 1111, 1111)
y <- c(11, 12, 13, 12, 13, 12, 13, 12, 13, 12, 13, 12, 13, 12, 13)
z <- c(
浏览 1提问于2016-10-19得票数 1
回答已采纳
1回答
我正在尝试生成与ggplot中的主刻度标签不同颜色的次轴刻度标签。 我有一个包含两组线和相应的不同y轴的图。如下面的最小示例所示，我已经成功地使每个线+轴标签对共享共同的颜色，以将它们与其他对区分开来。然而，我希望刻度标签也能共享这些颜色。 直观的方法是使用sec.axis和sec_axis，但它们似乎不提供区分次轴的刻度/标签格式与主轴的刻度/标签的方法。 谁有办法在不改变主轴的颜色的情况下改变次轴刻度线标签的颜色？ library(ggplot2)
# Example data
df <- data.frame(y1 = 1:10,
y2 = 2:11,
浏览 26提问于2021-07-29得票数 0
如何创建以下图形样式：
注意x-y轴(红色圆)和x-y轴(箭头)中突出的蜱之间的间隙.
我现在最多能做的是：
library(ggplot2)
p <- ggplot(mpg, aes(class, hwy)) +
geom_boxplot() +
theme_bw(base_size=10)
p
浏览 5提问于2017-06-19得票数 6
回答已采纳
我试图从这篇论文中重现一个情节：
我试图重现的情节是最左边的那个：
我能够准备数据，并相应地绘制它。我遇到的唯一问题是如何在y轴上设置断点，使每个断点之间的距离相等(即使两者之间的实际距离不同)。更准确地说:在我想要再现的图中，我们在y轴上有五个断点，范围从10^-1到10^-5:尽管10^-1和10^-2之间的实际距离比10^-4和10^-5大得多，但这些断点之间的距离是相等的。
我几乎读完了Hadley Wickham关于"ggplot2“的整本书，以了解如何做到这一点。我尝试在绘图的缩放层中设置限制和中断。我尝试更改扩展参数。我试着用coord_cartesian“放大”图形
浏览 34提问于2019-07-15得票数 0
回答已采纳
在ggplot2中，有一种用法，类似于：
geom_segment(aes(x=x0,y=y0,xend=x1,yend=y1))
aes(x=x0,y=y0,xend=x1,yend=y1)是什么意思？
我查看了ggplot2手册，但它没有详细解释这些参数。谢谢。
浏览 2提问于2011-12-08得票数 4
回答已采纳
1回答
我想得到一个带有对数轴的R图，并在x和y上固定相等的断点。我使用下面的代码将这些轴转换成日志比例尺。
library(ggplot2)
p <- ggplot(cars*1000, aes(x = speed, y = dist)) + geom_point() +
scale_x_log10(breaks = trans_breaks("log10", function(x) 10^x),
labels = trans_format("log10", math_format(10^.x))) +
scale_y_log10(breaks = tra
浏览 1提问于2019-11-26得票数 1
回答已采纳
我想用ggplot2手动设置加权散点图图例中显示的点大小。我的数据集与下图类似，在图中只有两个不同的点大小。我希望图例仅显示大小1和200，而不是自动生成的值范围。
library(ggplot2)
data <- data.frame(x = 0:10, y = 0:10, sz = c(200, rep(1, 10)))
ggplot(data, aes(x = x, y = y, size = sz)) + geom_point()
浏览 12提问于2018-01-22得票数 1
回答已采纳
我正在尝试使用R中的ggplot2创建一个带有下标字符的粗体轴标签。 我已经尝试了下面的方法，但下标的数字似乎是“未加粗的”(见下图)。 ? Y轴上'log‘后面的2似乎不是粗体。然而，这里发布的答案(Trying to bold y axis in ggplot)似乎表明是这样的。这只是ggplot2让它看起来的方式吗？ 以下是一些代码，用于使用更简单的数据集和较少的绘图输出格式(这不会对轴标签产生影响)来复制问题(如果确实是问题)： library(ggplot2)
dat <- data.frame(x = rnorm(100), y = rnorm(100
浏览 27提问于2019-05-18得票数 3
回答已采纳
2回答
我正在尝试编写一个函数，这个函数看起来应该非常简单，但是我对它有问题。我想写一个包含三个论点的函数: dataframe，x轴变量和y轴变量。基于这些，我希望它返回一个散射点，其中x轴变量和y轴变量可以被改变。这是我所写的最基本的功能：
scatter_plot <- function(dataframe, x_input, y_input) {
plot <- ggplot(data = dataframe) +
geom_point(mapping = aes(x = x_input, y = y_input),
)
}
要获得可再现性，请考虑ggplot2
浏览 2提问于2020-05-29得票数 1
我正在绘制PCA数据，默认情况下，ggplot2在X和Y轴上使用不同的网格间距(例如，x轴上的每个刻度= 10，但y轴上的每个刻度= 5)。我需要绘制大范围的数据，所以我不想每次都为y和x轴设置手动限制。
我尝试过，但它不能很好地工作，而且它仍然只使网格成为正方形，并且不会强制网格的比例在x和y上相同。
下面是一个可重复使用的示例：
library(ggplot2)
ggplot(mtcars, aes(mpg, cyl)) +
geom_point()
浏览 1提问于2018-04-02得票数 0
是否可以从ggplot2图中删除顶部和右侧边框？
也就是说，我想保留x轴和y轴，但删除图形周围的其余黑色框架。
//M
浏览 2提问于2011-03-28得票数 5
回答已采纳
我试着得到ggplot2图，上面有y轴和x轴。我用scale_y_reverse()来反转y轴，但不知道如何将x轴放在顶部而不是底部。
dfn <- read.table(header=T, text='
supp dose length
OJ 0.5 13.23
OJ 1.0 22.70
OJ 2.0 26.06
VC 0.5 7.98
VC 1.0 16.77
VC 2.0 26.14
')
library(ggplot2)
p1 <- ggplot(data=dfn, aes(x=dose, y=length
浏览 1提问于2014-11-25得票数 5
回答已采纳
我想要将Y轴分成两部分，并使用ggplot2在Y轴上引入断点。Y轴坐标: 0,500,1000,1500，break,12000,17000,22000,27000,32000 INPUT DATAFRAME
least_dist frequency category
250 444 Without Inhibitor
500 489 Without Inhibitor
1k 697 Without Inhibitor
2k
浏览 5提问于2019-10-07得票数 0
回答已采纳
3回答
上下文
我想用相同的图例在同一页上绘制两个ggplot2。描述了如何做到这一点。这看起来已经很不错了。但是..。在我的示例中，我有两个具有相同x轴和不同y轴的图。当y轴的范围至少是其他图的10倍时(例如，10000而不是1000时)，ggplot2 (或grid?)不能正确对齐绘图(请参阅下面的输出)。
问题
如何使用两个不同的y轴对齐绘图的左侧？
示例代码
x = c(1, 2)
y = c(10, 1000)
data1 = data.frame(x,y)
p1 <- ggplot(data1) + aes(x=x, y=y, colour=x) + geom_line()
y =
浏览 6提问于2011-08-19得票数 14
回答已采纳
目标
使用ggplot2 (最新版本)生成一个图形，在图形的两侧复制x-轴或y轴，其中刻度不是连续的。
极小Reprex
# Example data
dat1 <- tibble::tibble(x = c(rep("a", 50), rep("b", 50)),
y = runif(100))
# Standard scatterplot
p1 <- ggplot2::ggplot(dat1) +
ggplot2::geom_boxplot(ggplot2::aes(x = x, y =
浏览 5提问于2017-07-28得票数 1
回答已采纳
3回答
我想用facet_wrap绘制一个图，其中每个面板的轴可以不同，但是在一个面板中，x和y轴应该是相同的比例。
见下面的情节
df <- read.table(text = "
x y g
1 5 a
2 6 a
3 7 a
4 8 a
5 9 b
6 10 b
7 11 b
8 12 b", header = TRUE)
library(ggplot2)
ggplot(df, aes(x=x,y=y,g=g)) +
geom_point() +
facet_wrap(~ g) # all axes 1-12
ggplot(df, aes(x=x,y=y,g=
浏览 3提问于2015-02-27得票数 1
回答已采纳
2回答
我对ggplot2相对来说是个新手，在R中使用了多年的基本图形。关于基本图形，我一直喜欢的一件事是在轴上有额外的填充，这样两个轴就不会在原点上接触。下面是基本图形中的一个简单示例：
png(file="base.png")
plot(x,y, bty="n")
dev.off()
这使得：
当我在ggplot2中做类似的事情时
require(ggplot2)
x <- y <- 1:10
png(file="qplot.png")
qplot(x, y) + theme_classic()
dev.off()
我得到：
浏览 4提问于2014-08-15得票数 6
回答已采纳
所以，我想用ggplot2绘制x轴和y轴。我设法用一个函数：fun = function{x} {x* 0 }绘制了x轴，但我不知道如何对y轴做同样的事情。如果我使用绘制x轴和y轴的内置函数，例如：theme(axis.line.x = element_line(...))，那么我得到的线在绘图本身之外，但我需要轴来查看它们与其他函数的交点。有人能帮上忙吗？
浏览 19提问于2021-03-04得票数 0
回答已采纳
我想自定义绘图y轴上的间隙(断点)。我试了两种方法。
option1: ylim(0.0,0.6)
option2: scale_y_continuous(breaks=seq(0.0, 0.6, 0.1))
option1的问题是，它每增加0.2个y轴就会中断一次，y轴限制为0.6。
option2的问题是，它给人一种绘图之间巨大差异的错觉，因为它放大了绘图的0.1部分。
我想要的是y轴在每0.1处中断，或者自定义为任意中断，同时显示y轴的最大限制(在本例中为0.0到0.6，但每0.1中断一次)。
xVal = c(1,2,3,4,5,6,7,8,9,10,11,12,13,14,
浏览 0提问于2015-05-26得票数 6
回答已采纳
我的数据如下
x <- c(20, 10, 9, 8, 7, 6, 5, 4, 3, 2, 2, 3, 1, 0.5, 0.3)
y <- c(2e-42, 8e-20, 2e-15, 9e-9, 5e-7, 4e-7, 7e-5, 3e-3, 2e-2, 1e-1, 0.5, 0.3, 0.8, 5e-2, 8e-3)
data <- as.data.frame(cbind(x,y))
我想绘制x vs y. x轴是log10缩放的，y轴都是反向的，log10缩放的(可以更改比例以获得更好的可视化效果)。我还想选择y轴上的断点为< 0.000001，0.0001，0.
浏览 1提问于2020-06-27得票数 0
回答已采纳
我将此作为格子(即)“兄弟”问题的后续发布，但是由于图形系统的不同，它应该是分开的。
在ggplot2中生成包含来自ggthemes的geom_rug()的宽图时，凹凸不平的边距中的线条长度在y轴中比x轴长：
library(ggplot2)
library(ggthemes)
png(width=800, height=400)
ggplot(swiss, aes(Education, Fertility)) + geom_point() + geom_rug()
dev.off()
我希望那些x-和y-轴的地毯线是相同的长度，不管一个情节的形状(注意:现在地毯线将只有相同的长度，
浏览 17提问于2015-10-19得票数 8
回答已采纳
我有三列的数据帧，即索引、实际和预测(所有列都是数字的)。我使用2包plotly和ggplot2绘制x轴上的索引和实际值，并在y轴上进行预测。绘制图表的命令如下所示-
plot<- ggplotly(ggplot(dataframe, aes(x = index))+ geom_line(aes(y=Predicted), colour= "blue")+ geom_line(aes(y=Actual), colour="red"))
plot
R在没有任何建议的情况下顺利地给出了情节，但是突然它开始给出这样的建议，
我们建议您使用ggplot2的dev
浏览 0提问于2017-08-31得票数 4
我最近在ggplot2中遇到了一个不寻常的问题，其中轴断点不正确，但数量非常少，导致轴显示类似0.29999999992455的值，而不是应该显示0.3。在使用ggplot2的多年中，我从来没有遇到过这个问题，所以我不确定它对其他人的重现性有多大，但下面是导致我遇到这个问题的示例代码。提前感谢您的帮助！
此外，下面是我从代码中获得的输出：
#disabling scientific notation, since for some reason y-axis values were being displayed that way otherwise
options(scipen=999)
#
浏览 0提问于2020-04-18得票数 1
1回答
我试图修改ggplot2 wiki中给出的这个例子的y轴限制。
library(ggplot2)
x <- seq(1992, 2002, by=2)
d1 <- data.frame(x=x, y=rnorm(length(x)))
xy <- expand.grid(x=x, y=x)
d2 <- data.frame(x=xy$x, y=xy$y, z= jitter(xy$x + xy$y))
d1$panel <- "a"
d2$panel <- "b"
d1$z <- d1$x
d <- rbin
浏览 2提问于2014-03-07得票数 1
回答已采纳
目标是旋转图像，以便包括手实例在内的边界框都是轴对齐的。请参考以下示例。第一个图像是原始图像，第二个图像是旋转版本，其中左手(在图像中的左侧)轴对齐，第三个图像也是旋转版本，其中右手轴对齐。
现在给出四个点表示手定界框，我们必须计算旋转度数。让我以左手(在原始图像中的左边)为例。假设这四个点是p1_x，p1_y，p2_x，p2_y，p3_x，p3_y，p4_x，p4_y。byp1_x，p1_y和p2_x组成的线，p2_y表示手腕，p1，p2，p3，p4是顺时针方向。所以黄线是由p1_x，p1_y]和p4_x，p4_y组成的。
我的想法是计算黄线和水平轴之间的度数。左手的度数约为-
浏览 1提问于2014-09-22得票数 0
1回答
如何使用nvd3和分类X轴绘制带有图表的线形图？我尝试用ggplot2做的事情是这样的：
library(ggplot2)
dat <- data.frame(expand.grid(group = letters[1:3], x = letters[4:6]), y = rnorm(9))
ggplot(dat, aes(x = x, y = y, group = group, color = group)) + geom_line()
我试过了：
library(rCharts)
nPlot(y ~ x, group = 'group', data = dat, ty
浏览 4提问于2014-08-25得票数 2
我试图添加额外的x轴标签到一个ggplot2图与离散轴标签。我尝试过一些方法(包括一些使用grid的方法，即)，但是已经决定使用cowplot包中的add_sub()函数。然而，添加多个加法标签似乎并不简单，因为后续标签已经添加到绘图下面--使用一个附加标签进行修改，而应该与其垂直对齐)。这里是一个例子，其中“我的标签”在正确的位置，但“我的第二个标签”不是。我已经尝试手动调整第二个标签的垂直/y轴位置，但是在后续标签中也出现了同样的问题(实际上，对于第二个标签来说，同样的调整并不是以任何直接的方式对第三个标签起作用)。下面是一个示例：
library(ggplot2)
library(cow
浏览 2提问于2017-10-03得票数 1
我正在尝试创建一个显示条形图和线形图相互重叠的ggplot2图。在excel中，这可以通过添加第二个轴来完成。 X轴代表产品类型，条形图的y值应该代表收入，而我想要的折线图将利润率表示为百分比。折线图和条形图的值应该是相互独立的，即不存在这种关系。 require(ggplot2)
df <- data.frame(x = c(1:5), y = abs(rnorm(5)*100))
df$y2 <- abs(rnorm(5))
ggplot(df, mapping= aes(x=as.factor(`x`), y = `y`)) +
geom_col(aes(x
浏览 36提问于2018-12-24得票数 3
回答已采纳
编辑2
当前的gggplot2-Package开发版本确实解决了我在下面的问题中提到的错误。使用
devtools::install_github("tidyverse/ggplot2")
编辑
sec_axis在ggplot2 3.1.0中的错误行为似乎是一个缺陷。开发人员已经认识到这一点，他们正在进行修复(请参阅 on GitHub)。
目标
我有一个图形，y轴的范围从0到1，我想要添加一个从0到0.5的二级y轴(所以正好是主y轴值的一半)。到目前为止没问题。
使问题复杂化的是，我对y轴进行了自定义转换，其中y轴的一部分是线性显示的，其余部分是对数显示的(示例见下面的代码
浏览 1提问于2018-10-31得票数 12
回答已采纳
在ggplot2中有任何一种方法吗
以编程方式访问网格区域的x和y轴范围
告诉geom_text将文本居中于绘图区域的中间
示例
testData <- data.table(a = c(1,2,3,4), b=rnorm(100, 1, 3), c=rnorm(100))
ggplot(testData) + geom_point(aes(x=a, y = b)) + geom_text(aes(x=a, y = 0, label="label"))
我希望避免手动设置y轴的范围，因为我正在自动生成大量图表，并且希望让ggplot2确定要使用的正确范围
浏览 3提问于2013-09-30得票数 2
回答已采纳
如果我们可以在Oculus Go控制器上模拟6dof控制会怎么样？想象一下，我们将控制器3d模型转换为一只手，它仍然在旋转，但是想象一下，我们使用触摸板在空间中向前、向左、向右或向后移动手，触摸板让您在空间中沿z轴和x轴移动，但加速计/陀螺仪给您提供y轴和x轴。因此，加速计/陀螺仪充当手臂，触摸板充当手/手腕，这只手可以前后移动，只能左右转动，握住扳机，手不能上下倾斜，但手臂可以弥补这一点。那么我该如何构建它呢？
浏览 1提问于2018-11-21得票数 0
3回答
X轴上带串的on图
、、、
我正在画一幅有几条曲线的图。X轴不是数值，而是字符串.
这很好(如在中)：
require(ggplot2)
df_ok <- rbind(data.frame(x=4:1,y=rnorm(4),d="d1"),data.frame(x=3:1,y=rnorm(3),d="d2"))
ggplot(df_ok, aes(x,y)) + geom_line(aes(colour=d))
但我的数据如下：
require(ggplot2)
df_nok <- rbind(data.frame(x=c("four","three&#
浏览 6提问于2012-05-08得票数 17
回答已采纳
目标
使用ggplot2::scale_*_time以特定的方式格式化时间轴(使用最新版本的ggplot2)。
极小Reprex
# Example data
tib1 <- tibble::tibble(
x = 1:10,
y = lubridate::as.duration(seq(60, 600, length.out = 10))
)
与ggplot2::scale_*_time一起使用format = "%R"不起作用--轴是用%H:%M:%S格式化的
# This doesn't work
ggplot2::ggplot(tib1)
浏览 3提问于2017-07-28得票数 3
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
