如何使用ggplotly将geom文本标签向右移动？
使用ggplotly将geom文本标签向右移动，可以通过调整geom_text()函数中的hjust参数来实现。hjust参数控制文本标签的水平对齐方式，取值范围为0到1，其中0表示左对齐，1表示右对齐，默认值为0.5表示居中对齐。
要将文本标签向右移动，可以将hjust参数设置为大于0.5的值，例如0.7或0.8。通过增加hjust的值，文本标签将向右偏移，使其更接近数据点。
以下是一个示例代码：
library(ggplot2)
library(plotly)
# 创建一个基本的ggplot图形
p <- ggplot(mtcars, aes(x = mpg, y = wt)) +
geom_point()
# 添加文本标签，并将其向右移动
p <- p + geom_text(aes(label = rownames(mtcars)), hjust = 0.8)
# 将ggplot图形转换为plotly图形
p <- ggplotly(p)
# 显示plotly图形
p在上述代码中，首先创建了一个基本的ggplot图形，然后使用geom_text()函数添加了文本标签，并将hjust参数设置为0.8，以将文本标签向右移动。最后，使用ggplotly()函数将ggplot图形转换为plotly图形，并通过显示p来展示结果。
请注意，这只是一个示例，具体的应用场景和数据可能会有所不同。根据实际需求，可以调整hjust参数的值来实现不同程度的向右移动。
相关·内容
在使用ggplotly和鼠标悬停功能时，我遇到了文本格式化的问题。
library(plotly)
df <- data.frame(a=letters, b=LETTERS, x=runif(26), y=runif(26))
g <- ggplot(df, aes(x,y)) + geom_point(aes(text=sprintf('letter: %s\nLetter: %s', a, b)))
g
(gg <- ggplotly(g))
我想要一些格式化的文本，或者至少在我的鼠标悬停标签中有一个换行符。有没有很好的文档来说明如何设计鼠标滑过冒泡的东
浏览 4提问于2016-01-05得票数 36
回答已采纳
1回答
我有这个代码。基本上，当鼠标移动到value=50中的绘图上时，我有两个相互重叠的标签，所以基本上我看不到West标签，只能看到South标签。 我怎样才能防止这种情况发生呢？我做错了什么？我希望在鼠标悬停时将两个标签分开。 library(ggplot2)
library(ggplotly)
data <- data.frame(
name=c( "A" ),
value=c( 30,40,50,50),
location=c("North","East", "West","South")
浏览 12提问于2020-10-21得票数 0
3回答
我正在使用plot和Rshiny来创建一个带有文本标签的散点图。下面是一个可重复使用的示例：
library(ggplot2)
library(plotly)
dat <- data.frame(LongExpressionValue = rnorm(1:100),
LongMethylationValue = rnorm(1:100),
LongCopyNumberValue = rnorm(1:100))
rownames(dat) <- paste0('n',seq(1:100))
浏览 1提问于2016-05-17得票数 4
1回答
我用ggplotly绘制了一个图形。当光标移动到图形顶部时，我使用工具提示函数来表示条形图中的值。
Source_Data <-
data.frame(
key = c(1, 1, 1, 2, 2, 2, 3, 3, 3),
Product_Name = c(
"Table",
"Table",
"Chair",
"Table",
"Bed",
"Bed",
"Sofa",
"Chair",
"Sofa"
)
浏览 0提问于2019-11-18得票数 0
回答已采纳
我想知道如何才能通过滚动而不是使用缩放按钮来选择特定区域来放大绘图，因为我需要在不同分辨率下动态探索数据。理想情况下，我会有类似谷歌地图标签策略的东西，在那里你只能看到高级的主要标签，但当你放大时，会显示更多的标签。一个与缩放相关的问题是，当我绘制文本标签时，它们的大小相对于显示的绘图区域保持不变，这意味着放大不会增加字体大小。有没有办法在缩放时让字体看起来更大？
并在缩放后显示标签尺寸较小
此外，工具提示配置不适用于以下策略:将变量添加到ggplot中的aes中，并将其名称添加到ggplotly工具提示参数中。
p <- ggplot(mtcars, aes(x = disp, y
浏览 0提问于2020-04-03得票数 1
3回答
我刚刚发现了一个新的ggplotly函数，它可以将ggplot2图形转换为交互式的图形可视化。这太棒了。但我也遇到了一个奇怪的效果，可能是一个bug。
如果使用log=参数更改轴比例，轴标签将消失。log="x“将导致x轴标签消失，log="y”将导致y轴标签消失，log="xy“将导致两者都消失。
如果我使用scale_x_log10()和scale_y_log10()函数而不是日志参数，也会发生同样的事情。
有解决这个问题的办法吗？
示例(y轴标签可见，x轴标签消失)：
qplot(wt, mpg, data=mtcars, colour=factor(cyl),
浏览 1提问于2016-01-03得票数 4
我对ggplotly命令有问题。
如果我用xlab缩放轴，它会擦除ylab或scale_x_continuous文本。
library(plotly)
df <- data.frame(a=letters, b=LETTERS, x=runif(26), y=runif(26))
g <- ggplot(df, aes(x,y)) +
geom_point(aes(text=sprintf('letter: %s\nLetter: %s', a, b))) +
xlab('test') + ylab('test') +
浏览 3提问于2016-01-07得票数 2
回答已采纳
为什么在使用ggplotly函数绘制ggplot对象后，我的文本信息丢失？谁能告诉我如何将轴文本信息添加到点上?我的代码列表在这里。
data <- data.frame(x=c(1,3,4,6),y=c(2,5,9,6),z=c(1,1,2,2))
data
ggplot(data,aes(x,y,label=x))+geom_point()+geom_text()+facet_grid(z~.,scales="free_y")
ggplotly()
浏览 0提问于2015-11-16得票数 1
当我们将悬停标签移过错误栏时，有什么方法可以禁用它吗？我正在用图形来绘制图形。当光标移动到图形顶部时，我使用工具提示函数来表示条形图中的值。
Source_Data <-
data.frame(
key = c(1, 1, 1, 2, 2, 2, 3, 3, 3),
Product_Name = c(
"Table",
"Table",
"Chair",
"Table",
"Bed",
"Bed&#
浏览 0提问于2020-03-30得票数 1
回答已采纳
2回答
我正在尝试使用ggplotly()创建水平条形图。因为标签很长，所以我插入了换行符<br>。当使用ggplotly()绘制数据时，标签确实是被包装的，但是标签左边有很大的空白处，基本上使包装变得无用。除了使用plot_ly()之外，还有什么方法可以解决这个问题吗 library(ggplot2)
library(plotly)
df <- data.frame(a = "A very long label<br>that needs<br>to be wrapped", b = 10)
ggplotly({
ggplot(df
浏览 16提问于2020-01-07得票数 0
回答已采纳
我正在使用下面的代码来绘制一些数据点，它在ggplot中工作得很好。然而，当我将其输入ggplotly时，可视化和Y轴标签完全改变了。Y轴标签向右移动并翻转，中心的线条变得更细。
代码
library(ggplot2)
library(tidyverse)
library(plotly)
file2 <- read.csv( text = RCurl::getURL("https://gist.githubusercontent.com/gireeshkbogu/806424c1777ff721a046b3e30e85af5a/raw/50ac0b4696f514677b49
浏览 0提问于2020-06-04得票数 0
我被一系列在ggplot2中制作的极直方图的小标签问题所困扰(环丛？这些东西是怎么叫的？)。
以下是数据和图表外观的简化示例：
df <- data.frame(Attribute1=10, Attribute2=1, Attribute3=2, Attribute4=6, Attribute5=7)
g <- ggplot(melt.data.frame(df), aes(x=variable, y=value, fill=variable, label=value))
g <- g + geom_bar() + geom_text() + coord_polar()
浏览 0提问于2011-12-12得票数 10
回答已采纳
我正在创建一个闪亮的应用程序来显示调查结果。我想在一个图表中显示结果，问题文本作为y轴上的标签。(情节比下面的演示版本更复杂)。我想巧妙地使用，这样数据标签就会随着鼠标悬停出现。
问题是长的y轴标签导致图形形状被完全扭曲:所有东西都被推到右边，在左边留下很多空白。
我尝试手动添加换行符(使用<br>或\n)，但是仍然将图推到右边。我还在ggplotly调用中指定了“宽度”；这使其更宽，但仍然将其推向右侧。
是否有可能控制这些事情，无论是在圆滑还是在ggplot2内？
UPDATE编辑:这是我发现的解决方案，以防对其他人有帮助。它分为两部分：
1)在layout()调用中，在ggp
浏览 0提问于2019-08-22得票数 2
是否有一种方法可以在闪闪发亮的应用程序中通过ggplotly()显示文本?我想稍后传递一些需要ggplotly()的特性，我想知道这是否可行。
library(plotly)
library(shiny)
ui <- shinyUI(fluidPage(
titlePanel("HTML"),
sidebarLayout(
sidebarPanel(
),
mainPanel(
textOutput("testHTML"),
plotlyOu
浏览 3提问于2022-11-23得票数 0
1回答
我正在使用R编程语言。我发现了一个非常好的教程，它展示了如何使用ggplot库：制作气泡图。
# Libraries
library(tidyverse)
library(hrbrthemes)
library(viridis)
library(gridExtra)
library(ggrepel)
library(plotly)
# The dataset is provided in the gapminder library
library(gapminder)
data <- gapminder %>% filter(year=="2007") %>
浏览 6提问于2022-08-31得票数 0
1回答
我在R中有以下数据帧
DF_1<-data.frame("ID"=c("A_1", "A_2"), 'Sum'= c(2500,12500), "RR"=
c(95,95), "CC"= c(50,50), "nn"=c(4,4), "DP"= c(12.5,100))
我已经创建了下面的条形图，其中的文本写在条形图中，如下所示
p2<-ggplot(data = DF_1, mapping = aes(x = ID, y = DP,
fi
浏览 3提问于2019-10-30得票数 0
回答已采纳
当我将自己的文本添加到ggplotly的工具提示中时，文本的顺序发生了变化。在我的例子中，我的文本中的顺序是葡萄牙语，然后是德语，但是在绘图中顺序是不同的。 我该如何解决这个问题？ 谢谢 library(ggplot2);
library(plotly);
language <- c("de","es","hi","pt","sv","en")
averageRating <- c(6,4,3,9,10,30)
my_data <- data.frame(language, a
浏览 16提问于2021-04-30得票数 1
当通过ggplot2和plotly呈现相同的情节时，我注意到了许多不同之处。它包括标记尺寸、线条厚度和文本标签调整等基本内容。
require(ggplot2)
require(plotly)
data(iris)
p1 <-
ggplot(data = iris, aes(x=Sepal.Length, y=Sepal.Width, shape=Species, color=Species)) +
geom_point(size=3) +
geom_text(x=5.5, y=2, label='\u25BA',color='red',hju
浏览 3提问于2021-02-17得票数 0
这是我的图： ggplot(iris,aes(Sepal.Length,Species, fill = Species)) + geom_col() +
theme(axis.text.y = element_text(hjust = 0)) 我想要的就是将y轴向右移动，并将它们向左对齐，以将它们包含在条形图中。 当我更改hjus =时，标签没有左对齐/对齐。 有什么帮助吗？
浏览 86提问于2021-06-18得票数 0
回答已采纳
2回答
如何删除下面绘图的悬停文本中的cyl:？
library(plotly)
ggplotly(ggplot(mtcars, aes(mpg, hp, colour = cyl)) + geom_point(),
tooltip = c("colour"))
浏览 3提问于2016-04-14得票数 2
回答已采纳
1回答
在R中移动图形条形图中X轴的位置
、、、、
给定的脚本使用ggplot2包创建水平条形图。我想要移动图表顶部的x轴详细信息和标签。请帮帮忙。
library(ggplot2)
library(plotly)
time <- c("A","B","C")
total_bill <- c(12,34,23)
dat <- data.frame(time,total_bill)
p <- ggplot(data=dat, aes(x=time, y=total_bill)) +
geom_bar(stat="identity", fill = "#
浏览 0提问于2018-03-27得票数 1
1回答
我已经定义了一个函数，它接受一个data.frame并返回一个绘图，稍后我传递给plotly。我需要这个函数是灵活的，它将被多次调用(这就是我编写函数的原因)。一个简单的可复制的例子：
a <- data.frame(x = 1:3, y = c(2, 6, 3))
library(ggplot2)
library(plotly)
plotTrend <- function(x){
var1 <- names(x)[1]
var2 <- names(x)[2]
p <- ggplot(a, aes(x = get(var1), y = get(
浏览 2提问于2019-08-09得票数 4
回答已采纳
我想用ggplot2制作一个PCA评分图，然后用plotly把这个图转换成交互式图。
我想要做的是添加一个框架(而不是使用椭圆使用stat_ellipse，我知道它成功了)。
我的问题是，当我试图在tooltip中使用ggplotly示例名称时，框架就会消失。我不知道怎么修好它。
下面是我的代码
library(ggplot2)
library(plotly)
library(dplyr)
## Demo data
dat <- iris[1:4]
Group <- iris$Species
## Calculate PCA
df_pca <- prcomp(dat,
浏览 3提问于2022-06-30得票数 1
回答已采纳
1回答
考虑下面的简单示例。是否有一种方法来格式化巧妙的工具提示，使长文本标签在一个框中可见，而不是这个截取值的荒谬矩形？
library(ggplot2); library(plotly)
df <- data.frame(x = 1:10, y = 1:10, z = rep("the longggggggggggggggggggggggggggggestttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt labelllllllllllllllllllllllllllllllllllllll
浏览 0提问于2019-04-12得票数 4
回答已采纳
1回答
当您将鼠标悬停在已填充的geom_bar上时，如何解析双重标签？这不会发生在未填充的geom_bar中 # no fill
library(plotly)
dat <- data.frame(
time = factor(c("Lunch","Dinner"), levels=c("Lunch","Dinner")),
total_bill = c(14.89, 17.23)
)
p <- ggplot(data=dat, aes(x=time, y=total_bill)) +
geom_ba
浏览 23提问于2019-03-02得票数 2
回答已采纳
1回答
是否可以自定义ggplotly()工具提示中的标签以反映图表x和y轴的标签，如果可以，这是如何完成的。为了清晰起见，在工具提示标签中，我指的是用红色圈起来的部分，以及x和y轴的标签，我指的是在下面的图像中以绿色圈起来的部分。
我使用variables制作了一个交互式文档，并制作了一个直方图，用户可以在该直方图中从数据帧中的多个变量中选择要显示的变量。这是我的代码：
---
title: "Title"
output: html_document
runtime: shiny
---
{r, echo = FALSE}
library(epiDisplay)
libra
浏览 2提问于2021-10-20得票数 0
在使用ggplotly时，是否可以删除注释中的跟踪标签？
例如：
library(ggplot2)
library(plotly)
g <- ggplot(iris, aes(Sepal.Width, Sepal.Length)) +
geom_point() +
annotate("rect", xmin = 4, xmax = 5, ymin = 4, ymax = 5,
colour = "MediumSeaGreen", fill = "MediumSeaGreen", alpha = 0.3)
g
浏览 4提问于2022-02-21得票数 3
回答已采纳
我必须将ggplot转换为plotly。当然，最简单的方法似乎是使用ggploty，但字体大小会发生变化。返回到轴标签和标题的良好大小没有问题，但我不知道如何为数据标签做到这一点？有什么想法吗？我确实更喜欢保留ggplot并用ggplotly包装它(也有许多其他的图)。 我尝试了布局中的字体，但没有成功： library(ggplot2)
library(plotly)
tbl <- data.frame(
indicateur = c("freq1", "freq2", "freq3" ),
valeur = c(44, 78
浏览 44提问于2019-03-21得票数 0
回答已采纳
1回答
我正在开发闪亮的应用程序。我想用提交按钮渲染情节。我还想打印标签，如果用户选中输入复选框。我可以通过按钮渲染情节。但是当选中复选框时，它就不起作用了。
以下是代码：
library(shiny)
library(plotly)
ui <- fluidPage(
actionButton('RUN', 'Run'),
checkboxInput('PrintLab', 'Label', FALSE),
plotlyOutput("plot1")
)
server = function(in
浏览 0提问于2017-09-11得票数 0
回答已采纳
有没有办法在ggplotly对象中自定义hoverinfo？
例如,
p <- ggplot(mtcars, aes(x = disp, y= am, color = as.factor(cyl)))+geom_point()
ggplotly(p)
这里的悬停信息框包含三个变量:disp、am和factor(cyl)。如何在悬停信息框中包含更多变量或排除已有变量？
谢谢!
浏览 6提问于2016-11-15得票数 14
回答已采纳
我正在用ggplot() + geom_boxplot() + facet_wrap()为多个组绘制盒子图。我想在这个对象上使用ggplotly()来使用悬停工具提示，这样我就可以快速地查看与异常值相关的数据。(为什么我不只是在情节上加注解呢？我将将自定义文本添加到工具提示中，它比我希望出现在绘图上的固定注释中的内容更广泛。)
当我使用ggplotly时，会显示这些方面，但只会显示第一个方面的数据。facet_grid也是如此。(我更喜欢使用facet_wrap，这样我就可以在不同的方面之间使用自由的刻度。)
有没有一种方法可以让ggplotly以这种方式处理面？我在里什么也没看到。我见过其他
浏览 1提问于2021-03-04得票数 2
回答已采纳
我在通过一个循环绘制数百个情节。每个地块都有不同的参数，这导致y轴标签，例如，在一些图中为0.1-0.9，在另一些图中为100-1000。现在，当绘制它们时，图的总大小保持不变，这意味着y轴的位置在y轴标签长时向右移动，当标签较短时向左移动。
我想在所有情节中修正面板宽度。本质上，如果标签是短的，那么y轴标题的左边就会有空白。
我的问题有点类似于这个问题，但我对gtable没有足够的知识来修改我想要的解决方案。
玩具例子：
df <- data.frame(x = c(rnorm(10, 0.1, 0.1), rnorm(10, 1000, 100)),
y = c(rnorm(10,
浏览 2提问于2016-01-09得票数 3
回答已采纳
1回答
我有这段代码。如何才能轻松地将悬停文本diff更改为newlabel？这是我的网站http://webcovid19.online/ ggplotly(
ggplot(my_data, aes(x=date, y=diff)) +
geom_bar(stat='identity',fill='red') +
scale_y_continuous(labels = comma)
)
浏览 17提问于2020-12-07得票数 0
回答已采纳
2回答
我想在R.中的点图中添加悬停文本注释，但似乎不适用于geom_dotplot。
我希望最后的点击图看起来像这样：
df <- data.frame(年份=c(“2000年”、“2005年”、“2005年”、“2010年”、“2010年”、“2010年”)、名称=c(“乔治”、“迈克尔”、“鲍勃”、“詹姆斯”、“威尔”、“法布里齐奥”)、ggplot(df，aes(x =年份))+ geom_dotplot(堆栈比= 1，填充=“深绿色”，stackgroup= TRUE)
但是，当您在给定的点上悬停时，我希望出现“名称”数据。
下面的代码适用于其他图形(例如，geom_point
浏览 6提问于2022-08-23得票数 1
我想模仿Excel平滑风格在R中使用ggplot2和绘图。 套餐 library(dplyr)
library(tibble)
library(ggplot2)
library(plotly)
library(ggforce) #only for geom_bspline() in example below (other smoothing functions can be used)
library(scales) #only for percent() formatting below 示例数据集 df <- tibble(Group = rep(LETTERS[1:2], e
浏览 8提问于2019-10-12得票数 3
1回答
我正在尝试创建一个跨多个雇主的个人工资增长的交互式可视化。我使用geom_rect系列来显示支付期和工资信息。当我应用ggplotly函数时，默认情况下不会显示鼠标悬停工具提示，并且我找不到启用它们的方法。 要在geom_rect上启用工具提示，可以执行哪些操作？ 数据： df <- data.frame(
"From" = seq(as.Date("2016-01-01"), as.Date("2026-01-01"), by = 14),
"To" = seq(as.Date("2016-01-01")
浏览 21提问于2020-12-13得票数 1
我想用plotly制作一个线条图，这样它的整个长度就不会有相同的颜色了。颜色被赋予连续的尺度。在ggplot2中很容易，但是当我使用ggplotly函数将其转换为plotly时，决定颜色的变量的行为就像分类变量。
require(dplyr)
require(ggplot2)
require(plotly)
df <- data_frame(
x = 1:15,
group = rep(c(1,2,1), each = 5),
y = 1:15 + group
)
gg <- ggplot(df) +
aes(x, y, col = group) +
geo
浏览 0提问于2016-12-21得票数 4
回答已采纳
我刚开始使用plot，但找不到有关如何命名跟踪的相关文档，因此在ggplotly呈现的plot中会出现一个有意义的标签。下面是显示大量示例的。需要什么才能在悬停时显示有意义的标签，而不是后面跟着trace0、trace1等的值。
例如，在第一个图中，如何显示标签以使其显示：
比例:值
总账单:值
理想情况下，我希望直接在R中完成此操作，而不是通过web界面。提前谢谢。
浏览 0提问于2015-08-19得票数 6
回答已采纳
假设我有个锚牌。当锚标签除了颜色和背景色变化外，如何使用转换移动锚标签中的文本，使其在悬停时向右移动5像素，并在大约一秒钟后返回到原来的位置。
浏览 0提问于2013-08-02得票数 2
回答已采纳
1回答
我有以下数据集：
dput(head(table_age))
structure(list(Age = c("0-19", "20-24", "25-29", "30-34", "35-39",
"40-44"), Freq_nominal = c(1321, 3446, 5354, 7233, 7471, 6623
), Freq_percent = c(1.92, 5.01, 7.79, 10.52, 10.86, 9.63), Percent = c("1.92%
浏览 1提问于2017-07-05得票数 0
回答已采纳
1回答
我有一个散点图，我想在点之间添加一条平滑的连接线。我可以使用ggplot和一个绘图包装器来做到这一点，没有问题： library(tidyverse)
library(plotly)
dat <- data.frame(x = c(0.89910345, 0.994439176, 0.881675547, 0.993289873, 0.990991268, 0.980292298, 0.984415918, 0.993125417, 0.990463749, 0.994603633, 0.965500006, 0.990827284, 0.993618787, 0.992961434
浏览 13提问于2021-11-19得票数 1
回答已采纳
1回答
我已经使用以下数据集和ggplot2创建了一个图 我从以下链接下载了CSV格式的数据集 https://www.kaggle.com/dataset/e392d3cfbb5749653d5c82f4bec1daa03628fb06d374fad84eac319f1b3f982422 我使用的代码如下 library(readr)
library(ggplot2)
library(plotly) 接下来，我从CSV文件创建数据帧 DF <- read_csv("C:/Users/mysystem/Desktop/Random3.csv")####Please set
浏览 13提问于2020-08-16得票数 2
回答已采纳
1回答
我希望用图形来绘制线条图，并以百分比表示数字。因此，在或之前的ggplot命令以百分数表示数字，在或之后以小数表示。情节似乎不一样。如何使用小数绘制图表并以百分比表示工具提示标签？
library(plotly)
library(ggplot2)
library(devtools)
library(proto)
library(RColorBrewer)
library(gapminder)
library(stringr)
library(broom)
library(mnormt)
dat1 <- data.frame(
sex = factor(c("Female"
浏览 5提问于2017-08-07得票数 7
回答已采纳
1回答
我想在一个图形中使用geom_label的"fill“函数。不幸的是，ggplotly不支持geom_label。相反，我正在使用geom_text，但您不能在这里使用"fill“。有没有其他方法可以在没有geom_label的情况下获得文本周围的背景，如下图所示？ ?
浏览 28提问于2021-07-06得票数 0
1回答
我想要有一个用不同颜色绘制的线条，如下面的例子：
test_data <-
data.frame(
var0 = 100 + c(0, cumsum(runif(49, -20, 20))),
var1 = 150 + c(0, cumsum(runif(49, -10, 10))),
date = seq(as.Date("2002-01-01"), by="1 month", length.out=100)
)
plot <- ggplot(test_data, aes(x = d
浏览 3提问于2017-04-14得票数 0
回答已采纳
1回答
在下面的直方图中，如何将每个bin的下界和上界作为工具提示文本以切换方式包含？
library(ggplot2)
library(plotly)
csub<-data.frame(Anomaly10y = rpois(50,5))
p <- ggplot(csub,aes(x=Anomaly10y)) +
stat_bin(binwidth=1, aes(label1 = min(Anomaly10y, na.rm = T), label2 =
max(Anomaly10y, na.rm = T)))
ggplotly(p, tooltip = c("lab
浏览 1提问于2018-02-09得票数 1
回答已采纳
我想在ggplot中的每一列上设置文本，它们都聚集在一起 这是我的代码 set.seed(1)
gg <-
iris[sample(300, 50), ] %>%
ggplot(aes(Species, Sepal.Length, label = Sepal.Length, fill = as.factor(Sepal.Width > 3))) +
geom_col(position = "dodge2") +
geom_text(position=position_dodge(width = .7),
vjust
浏览 37提问于2020-10-20得票数 0
回答已采纳
1回答
R个重复的图例
、、
我试着生成一个图，上面的每个点代表一个事件。颜色、大小和faced_grid用于提供视觉上可用的附加信息。图形在ggplot2中工作，但知道确切的数字通常很重要，因此需要一个交互式版本，使您能够将鼠标悬停在点上并获取信息。我尝试使用plotly-package中的函数ggplotly将绘图转换为交互式版本。问题是，图例不仅显示了所用属性的不同状态，而且还包含了所有现有的组合。此外，它不显示来自geom_rect的信息。 我发现了相关/类似的问题，但他们使用了函数plot_ly而不是ggploty，或者没有提供答案。 下面是mtcars数据集的相同问题： library(plotly)
g
浏览 5提问于2019-06-16得票数 0
1回答
如何巧妙地手动设置点的标签？
library(ggplot2)
library(plotly)
p <- iris %>%
ggplot(aes(Sepal.Length, Sepal.Width, color = Species)) +
geom_point() +
labs(
title = "A graph",
x = "Sepal Length (cm)",
y = "Sepal Width (cm)",
color = "Species of Iris"
)
ggplotly(p)
浏览 4提问于2022-06-15得票数 0
回答已采纳
使用下面的"Horizontal grid" example from the Plotly ggplot2 Library 我想在两个子图中省略X轴上的标签，例如： ? 据称，执行此操作的方法应该是使用layout()函数并包含配置参数xaxis = list(showticklabels = FALSE)。但是，请参见以下reprex中的输出： library(tidyverse)
library(reshape2)
library(plotly)
p <- ggplot(tips, aes(x=total_bill, y=tip/total_bill))
浏览 43提问于2019-08-29得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
