从plot ggplot2中删除所选标签
可以使用theme()函数中的axis.text参数来控制标签的显示。
首先，需要安装和加载ggplot2包：
install.packages("ggplot2")
library(ggplot2)接下来，我们可以使用theme()函数来修改标签的显示：
p <- ggplot(data, aes(x = x, y = y)) +
geom_point() +
labs(x = "X轴标签", y = "Y轴标签")
p + theme(axis.text.x = element_blank(), axis.text.y = element_blank())以上代码中，element_blank()函数将标签内容设置为空白，从而达到删除标签的效果。
theme()函数还可以控制其他方面的图表外观，比如轴线的显示、标题的显示等。
推荐的腾讯云相关产品是云服务器（CVM），腾讯云云服务器（CVM）是一种基于云计算技术的虚拟化服务器，具有高性能、可扩展、弹性可调的特点。您可以点击以下链接获取腾讯云云服务器的详细介绍：腾讯云云服务器
相关·内容
1回答
实际上轴标重叠过大
、、、、
我正在巧妙地使用R、shiny和ggplot2。当输出刻度标签过大的地块(如下面所示)时，轴标签与滴答标签重叠，如下所示：
#UI.R
library(shiny)
library(plotly)
library(ggplot2)
shinyUI(fluidPage(
plotlyOutput("Plot")
))
#Server.R
shinyServer(function(input, output) {
output$Plot <- renderPlotly({
plot <- ggplot(diamonds, aes(x=cut)
浏览 3提问于2016-09-07得票数 0
回答已采纳
我有一个用ggplot2生成的包含10个散点图的多点图。我用来创建图的代码已经从这里删除了，我的问题是我想为每个散点图添加不同的标题，例如，图1的标题可以是"plot 1"，而plot 2的标题可以是"plot 2“，依此类推。我还想将所有地块的标签从当前标签"Y“更改为"purchases”。
浏览 3提问于2017-04-11得票数 0
1回答
我想用百分位数来创建一个点图，它看起来像这样-
下面是我用来创建点图的ggplot2代码。有两件事我想改变：
我可以在y-axis上绘制百分位数值，但我希望在x-axis上显示这些值(如上图所示)。注意到坐标被翻转了.
轴不显示最小值的标签(例如，百分位轴标签从25开始，而不是从0开始)。
# loading needed libraries
library(tidyverse)
library(ggstatsplot)
# creating dataframe with mean mileage per manufacturer
cty_mpg <- ggp
浏览 0提问于2018-08-17得票数 1
回答已采纳
2回答
有人知道如何在ggplot2中控制图例的顺序吗？
根据我所看到的，顺序似乎与实际的刻度标签相关，而不是刻度声明顺序。更改比例尺标题会改变顺序。我用菱形数据集做了一个小例子来突出这一点。我正在尝试使用ggplot2来绘制一系列的图，我想让一个变量出现在所有图的右侧。不过目前这种情况只发生在其中的一些地方，我不知道如何在保留适当的比例标签的同时强制执行我想要的顺序。
library(ggplot2)
diamond.data <- diamonds[sample(nrow(diamonds), 1000), ]
plot <- ggplot(diamond.data, aes(cara
浏览 1提问于2012-07-09得票数 78
回答已采纳
7回答
我正在用ggplot2开发一个图形，其中我需要将文本叠加到其他图形元素上。根据文本底层元素的颜色，可能很难阅读文本。有没有办法在具有半透明背景的边界框中绘制geom_text？
我可以用plotrix做到这一点：
library(plotrix)
Labels <- c("Alabama", "Alaska", "Arizona", "Arkansas")
SampleFrame <- data.frame(X = 1:10, Y = 1:10)
TextFrame <- data.frame(X = 4:7,
浏览 9提问于2011-10-05得票数 21
回答已采纳
1回答
在包中包含ggplot2函数
、、、、
我试图在一个包中包含以下ggplot2助手函数，它包装了grid_facet中的标签(.~variable，labeller = "plot.label.wrap")
#' Label wrapper for ggplot
#'
#' Include in the facet_grid option of ggplot.
#' @param variable
#' @param value
#' @return wrapper
#' @export
plot.label.wrap <- function(varia
浏览 2提问于2015-04-30得票数 4
回答已采纳
我想用多个系列在ggplot上标出一条水平线，而不是把这条线和一个系列联系起来。询问单系列案例，geom_text解决了这个问题。然而，geom_text通过颜色和图例将标签与其中一个系列相关联。
考虑这个问题中的同一个例子，另一个color列：
library(ggplot2)
df <- data.frame(y=1:10, x=1:10, col=c("a", "b")) # Added col
h <- 7.1
plot1 <- ggplot(df, aes(x=x, y=y, color=col)) + geom_point()
p
浏览 1提问于2015-09-06得票数 3
回答已采纳
正如标题所述，我需要使用facet.by从小提琴盒情节中每个子情节的标题中删除与ggplot2相关的标签。
读取数据并创建绘图
plotIt <- read.table("tryit.csv", sep="\t", header=T)
p <- ggviolin(data, x = "label", y = "aMeasure", fill="label", palette=rainbowcols, + facet.by="timepoint", add.params = lis
浏览 2提问于2019-08-01得票数 1
回答已采纳
我有一个使用scale_fill_gradientn在ggplot2中创建的图。我想在最小和最大比例图例中添加文本。例如，在图例最小值显示" minimum“，在图例最大值显示" maximum”。有一些帖子使用离散填充，并添加带有数字而不是文本的标签(例如)，但我不确定如何将labels功能与scale_fill_gradientn一起使用，以便仅在最小和最大处插入文本。目前，我倾向于得到错误：
Error in scale_labels.continuous(scale, breaks) :
Breaks and labels are different lengths
浏览 1提问于2014-06-17得票数 31
回答已采纳
我有一个函数，它根据mtcar中“齿轮”的唯一值创建一个情节列表。
library(datasets)
library(magrittr)
library(ggplot2)
library(dplyr)
make_plots <- function(data) {
### create list of plot objects for every unique value of 'gear' (from mtcars)
p_list <- lapply(sort(unique(data$gear)), function(i) {
ggplot
浏览 0提问于2021-04-28得票数 1
回答已采纳
我正在尝试使用lapply为函数中的每个直方图生成xlab直方图标题。 plot.labels <- colnames(total_data[27:50])
out1 = lapply(total_data[,27:50], function(x){ggplot(data.frame(x), aes(x, fill=total_data$status,color=total_data$status)) + geom_histogram() + labs(x=plot.labels[x])})
View(plot.labels) 打印标签看起来很正常，例如：1 "pct_My
浏览 7提问于2021-03-20得票数 0
2回答
我有如下所示的时间序列数据
## simulate ARIMA(1, 0, 0)
set.seed(289805)
x1 <- arima.sim(n = 10, model = list(ar = 0.8, order = c(1, 0, 0)), sd = 1)
set.seed(671086)
x2 <- arima.sim(n = 10, model = list(ar = 0.9, order = c(1, 0, 0)), sd = 1)
set.seed(799837)
x3 <- arima.sim(n = 10, model = list(ar = 0.95,
浏览 1提问于2021-09-24得票数 1
回答已采纳
在R下使用ggplot2 (下面的代码使用rpy2，我实际上不太了解R，抱歉)。
我正在尝试添加一个aspect_ratio到我的图中(这样它就可以很好地放在幻灯片上)。下面的例子非常简单。Aspect_ratio所做的是正确的，除了标题和x轴标签分别放在绘图的上方和下方，标题和绘图之间以及绘图和x轴标签之间有一个巨大的空格，就像在中一样
TITLE TITLE
PLOT PLOT PLOT PLOT
PLOT PLOT PLOT PLOT
PLOT PLOT PLOT PLOT
PLOT PLOT PLOT PLOT
x-axis label
一点也不酷。我该怎么做才能
浏览 1提问于2010-10-15得票数 1
回答已采纳
2回答
我想知道是否可以在(x - top："mpg")和(y -右："wt")使用包牛仔图上的轴标签。
library(ggplot2); library(cowplot)
plot_a <- ggplot(mtcars, aes(mpg,wt)) + geom_point()
ggdraw(switch_axis_position(plot_a, axis = 'xy',keep = 'xy'))
谢谢!
浏览 2提问于2016-09-29得票数 1
回答已采纳
1回答
我有一个光栅地图，我想用ggplot2来绘制，使用一个连续的比例，并在上面标上等值线。
为此，我使用了directlabels软件包，接近于得到我想要的东西，但我无法在同一张地图上同时获得图例和标记等值线。
下面的代码复制了我的问题：
install.packages(c('ggplot2', 'directlabels'))
library('ggplot2')
library('directlabels')
df <- expand.grid(x=1:100, y=1:100)
df$z <- df$x * df$
浏览 4提问于2016-07-01得票数 11
回答已采纳
我正在学习Drew和John在“”一书中的一篇教程，我遇到了一个绘制直方图的问题。示例代码在这里运行绘图部分：
> quick.hist <- ggplot(ufo.us, aes(x = DateOccurred)) +
+ geom_histogram() +
+ scale_x_date(major = "50 years")
产生
Error in continuous_scale(aesthetics, "date", identity, breaks = breaks, : unused argument(s) (major
浏览 5提问于2012-03-25得票数 14
回答已采纳
1回答
我正在尝试使用基于StackOverflow answer的ggrepel创建带标签的饼图，但我似乎无法正确获取标签的位置。 理想情况下，我希望将标签连接到馅饼部分的部分从馅饼的中间开始，以使其更美观。但这不是我得到的，我不确定我应该改变什么。我试过在ggrepel调用中设置position = ggplot2::position_fill(vjust = 0.5)，但也没有帮助。 数据 # setup
set.seed(123)
library(ggplot2)
library(ggrepel)
library(forcats)
# data
(df <- structure(
浏览 16提问于2020-07-20得票数 2
回答已采纳
1回答
使用一个名为Likert的R包，它使用ggplot2和我想要更改字体系列。在包中，它看起来如下所示：
if(plot.percent.high) {
p <- p + geom_text(data=lsum, y=100, aes(x=Item,
label=paste0(round(high), '%')),
size=text.size, hjust=-.2, color=text.color)
}
想知道如何在不了解这些信息的情况下从包外
浏览 2提问于2014-12-08得票数 2
回答已采纳
我正在使用ggplot2，使用geom_bar()中的position = "fill"选项将相对值累加到100%。
这里我的代码：
test <- data.frame (x = c('a','a','a','b','b','b','b')
,k = c('k','j','j','j','j','k','k')
,y
浏览 2提问于2018-06-04得票数 1
回答已采纳
我已经成功地使用sjplot的plot_model函数绘制了一个多项式logistic回归模型。回归包含一个结果(信息搜索，具有3个水平)和2个连续预测因子(DSA，ASA)。我还更改了plot_model中的ASA值，以便根据ASA平均值和SDs绘制预测的效果结果：
plot1 <- plot_model(multinomialmodel , type = "pred", terms = c("DSA", "ASA[meansd]")
我有两个自定义问题：
1)刻面顺序:刻面顺序基于结果级别的默认字母顺序(依次为“Expand”
浏览 50提问于2019-07-18得票数 1
回答已采纳
我想在使用ggplot2使用mjca之后创建一个图表，其中只包括标签中的级别名称，而不包括因子:级别。参见示例-如何操作这些因子:级别标签？ library(ca)
library(ggplot2)
data("wg93")
mj <-mjca(wg93, supcol = 5:7, lambda = "JCA")
summary(mj)
cats = apply(wg93, 2, function(x) nlevels(as.factor(x)))
cats
# eigenvalues
mj$sv^2
# column coordinat
浏览 19提问于2019-12-20得票数 0
回答已采纳
1回答
我有一系列的线条情节，由ggplot2制作。
我想把它们安排在一个小区中，我可以用牛仔包中的plot_grid来完成这个任务。然而，由于标签(Universit vs. )的长度不相等，情节没有正确地对齐。我想要的是网格区域与所有的地块都是完全一致的。知道我怎么能做到这一点吗？
这是我的密码：
cowplot::plot_grid(plot_party, plot_educ, plot_sex, labels=c("A", "B", "C"), ncol = 1, nrow = 3)
浏览 4提问于2017-06-07得票数 1
回答已采纳
我试图在应用程序和中实现类似于和的东西，而不是像那样在浏览器级别实现。
捕获所选新选项卡(tabPanel值)的值后，在切换到新选择的选项卡以显示其内容之前，无法显示确认消息。
library(shiny)
library(ggplot2)
library(shinyalert)
ui <- fluidPage(useShinyalert(),
tabsetPanel(id = "tabselected",
tabPanel("Tab1"),
tabPanel("Tab2",plotOutput("plot&#
浏览 2提问于2020-01-27得票数 1
回答已采纳
我如何用timeSeries::plot给y轴加上希腊字母的标签？也就是说，将某人、SP等更改为\alpha、\beta等，我知道我需要某种方式的expression()。然而，我甚至无法找到标签(我通常使用ggplot2)。下面的代码。
# install.packages("xtable", dependencies = TRUE)
library("timeSeries")
## Load Swiss Pension Fund Benchmark Data -
LPP <- LPP2005REC[1:12, 1:4]
coln
浏览 1提问于2016-09-30得票数 1
回答已采纳
1回答
我的目标是在ggplot2中制作一个简单的列图，类似于下面的图表(用Excel制作)：
我发现，对于这样的示例数据(其中一个百分比的值非常接近100%)，我在ggplot2中绘制该数据的选项留下了一些不理想的地方。特别是，我还没有找到一种方法来使以下两件简单的事情在一起发生：
1)使y轴线以100%结束。
和
2)使每个条形上的百分比标签可见
为了解决这个问题，我尝试过用不同的参数对scale_y_continuous()进行实验，但是没有找到一种同时实现上述两个目标的方法。您可以在下面的示例绘图和代码中看到这一点。
我的问题是:如何扩展y缩放，使我在每个数据点上的百分比标签是可见的，但
浏览 1提问于2017-04-07得票数 1
回答已采纳
1回答
我正在用ggplot2在R中编程创建很多图表，除了酒吧标签的位置之外，所有东西都工作得很完美。
这需要输入绘图高度、y轴比例尺和文本大小。
示例(简化)绘图代码：
testInput <- data.frame("xAxis" = c("first", "second", "third"), "yAxis" = c(20, 200, 60))
# Changeable variables
yMax <- 220
plotHeight <- 5
textSize <- 4
# Set up
浏览 2提问于2017-11-15得票数 0
回答已采纳
运行此脚本并得到错误:找不到函数"plot_gg“
已尝试卸载并再次安装ggplot2
运行3.6.0
library(rayshader)
library(ggplot2)
library(tidyr)
gg = ggplot(diamonds, aes(x, depth)) +
stat_density_2d(aes(fill = stat(nlevel)),
geom = "polygon",
n = 100,bins = 10,contour = TRUE) +
facet_wr
浏览 2提问于2019-07-03得票数 2
有没有办法将等高线标签添加到使用ggplot2中的geom_density_2d制作的2D内核密度图中？ library(ggplot2)
# load data
data("meuse")
# plot
ggplot(meuse, aes(x=x, y=y)) +
geom_density_2d() ? 我尝试从构建的ggplot对象中提取出绘制的数据，以便可以将其从metR传递给geom_text_contour，但是它返回的数据是一组用于绘制轮廓线的点，而不是geom_text_contour需要的x/y坐标网格。 # extract denisty 2
浏览 102提问于2021-09-21得票数 1
回答已采纳
我有一个样本数据集，其中包含周末日期和流失值，可以是负的，也可以是正的。在ggplot2中，我在值的符号上使用scale_fill_manual()作为组。这可以很好地显示正值和负值的颜色。此外，标签会根据提供的标签进行重写。然而，如果我只是简单地将其绘制成一个曲线图，我就会丢失我的标签，并且它们被设置回-1，1因子。plotly不支持这一点，如果是这样，他们是另一种实现这一点的方法吗？ library(ggplot2)
library(plotly)
dt <- structure(list(date = structure(c(18651L, 18658L, 18665L, 18
浏览 64提问于2021-11-18得票数 4
回答已采纳
1回答
我想显示一个相对较长的标签，并且不希望这个标签占用图表的空间。
示例：
library(ggplot2)
out <- ggplot(economics, aes(x=date,y=unemploy)) +
geom_line() +
labs(title="US unemployment rate",
subtitle="(%)",
caption="Source: St. Louis Fed.\n Last
浏览 0提问于2019-01-15得票数 1
回答已采纳
我正在尝试使用光线渲染库在3d中可视化下面的ggplot2对象。
谢谢!
然而，我无法找到一种方法来防止文本标签变成3d，只有点。有办法这样做吗？
plot_gg(plot_cities
, width=4.0
, height = 4.0
, multicore = TRUE
, windowsize = c(1400,866)
, sunangle=225
, zoom = 0.60
, phi = 30
浏览 2提问于2022-11-05得票数 0
我试图将两个ggplot2图并排排列，即使用包gridExtra进行两列布局。我感兴趣的是，无论x轴标签的高度是多少，我都有兴趣确保这两幅图都有相等的绘图面积(即，灰度图面板对两幅图都是相同的)。正如您在下面的示例中所看到的，当使用较长的x轴标签时，gridExtra::grid.arrange()似乎通过调整绘图区域(即绘图的灰色部分)来补偿这一点。
# Dummy data.
data <- data.frame(x = 1:10, y = rnorm(10))
# Dummy labels.
x_labels_short <- 1:10
x_labels_long <
浏览 7提问于2021-09-22得票数 1
回答已采纳
我想知道如何在ggplot2中获取轮廓线上的数据标签。谢谢
require(grDevices) # for colours
x <- seq(-4*pi, 4*pi, len = 27)
y <- seq(-4*pi, 4*pi, len = 27)
r <- sqrt(outer(x^2, y^2, "+"))
rx <- range(x <- 10*1:nrow(volcano))
ry <- range(y <- 10*1:ncol(volcano))
ry <- ry + c(-1, 1) * (diff(rx) -
浏览 1提问于2012-11-29得票数 19
回答已采纳
1回答
我有一个交互式的显示，包括一个条形图，显示一个为不同类别选定的统计数字。然而，ggplot2根据标签调整y轴的宽度，从而使条子在x方向上烦人地移动。见示例：
library(shiny)
library(dplyr)
library(ggplot2)
shinyApp(
ui = bootstrapPage(
selectInput('statistic', label='Chose a statistic', choices=c('carat', 'depth', 'table', 'pri
浏览 2提问于2016-01-08得票数 6
回答已采纳
1回答
在编织一个R标记文件时，使用cache=TRUE从任何块中输出的绘图将独立于HTML保存。这对我来说很有意义。但是，即使是单个块都有cache=TRUE选项集，那么所有块，包括那些带有cache=FALSE的块，都会独立保存它们的代码块。例如，以下代码保存两个块的图像文件：
---
title: "Cache Plot Test"
output:
html_document:
df_print: paged
---
```{r test_plot1, cache = FALSE}
图书馆(Ggplot2)
(空气质量，aes(x =温度，y=风))+
geom_p
浏览 3提问于2021-12-08得票数 2
回答已采纳
如果其他人试图自定义DataExplorer的plot_missing()函数中的颜色并对乐队标签进行硬编码，那么下面是一个简单的方法。
默认输出
# To show all bands I've replaced `species` column in the `starwars` dataset with NA
data(starwars)
df <- starwars
df$species <- NA
library(DataExplorer)
plot_missing(df)
正如您所看到的，得到的图形有按字母顺序排列的乐队标签“不好，移除”，这与协调颜
浏览 1提问于2019-05-01得票数 0
回答已采纳
我在R中用ggplot2绘制了一个图，我想在y轴上添加一个水平文本标签。但是，根据我的文本长度，R相应地压缩我的绘图以创建一个固定宽度的图像。然而，我需要的情节是相同的长度和有相同的开始和停止位置(边距)，无论文本宽度。
我试图通过覆盖默认的ggplot2主题元素来更改绘图边距，如下所示：
library(ggplot2)
png(filename="sample.png", width=5600, height=70)
plot.data <- data.frame(start.points=c(my_start),end.points=c(my_stop))
p &l
浏览 3提问于2014-04-08得票数 0
回答已采纳
当我尝试使用标签突出显示我的数据时，我发现ggplot2::geom_text()有一个问题。我的MWE说明了这种情况。在定义了绘图之后，我从phase#1添加了主题()，它为面板和绘图背景着色。红色/绿色表示强调。在phase#2中添加标签时，plot.background变为白色，面板背景变为默认灰色。这是我正在做的事情吗，这是ggplot2的一个未记录的功能，还是这是一个错误？ require(ggplot2)
SESnow <- data.frame(Year=c(1978,1988,1995,2000,2013,2017),
Snow
浏览 23提问于2019-02-08得票数 2
回答已采纳
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
回答已采纳
我有一个数据框，并且我基于它(用ggplot2)做了一个散点图。如下所示： df = data.frame(x = letters, y = c(1:26))
p = ggplot(df, aes(x = x, y = y)) + geom_point() 但是我想在图中添加一个特定的标签(使用geom_text)，在某个坐标中。问题是标签没有显示在打印的绘图中。 p + geom_text(x = 3, y = 30, label = "Scatter plot") Plot without printed label 只有当我想使用坐标时，这个特定的错误才会出现，因为如果
浏览 160提问于2021-03-15得票数 2
回答已采纳
1回答
我已经用ggplot2在R中生成了一个极坐标图，并且想从两个方面找到一种方法来清理这个图。第一种方法是如何移除圆形区域周围的矩形框，它也有x/y标签和y勾标。第二个问题是，如何消除图中最后一个距离环在15000与有方位角刻度的环之间的额外空间？我在下面列举了一个完整的例子。谢谢你的帮助。
# Load needed Libraries ---------------------------------------------------
library(ggplot2)
# Generate Fake Data ---------------------------------------
浏览 1提问于2013-12-27得票数 0
回答已采纳
1回答
正如在其他一些问题中所显示的，在ggplot2中，当窗口的大小很小且刻度/标签的数量很大时，轴上的标签可以重叠：
x <- data.frame(x1=1:100,x2=1:100)
ggplot(x, aes(x1,x2))+geom_point() +
scale_x_continuous(breaks = x1[x1 %% 2 == 0])
在一般的绘图中，当我们改变窗口的大小时，标签的麻木是自动适应的(所有的滴答都是绘图的)：
plot(x1,x2, xaxt="n")
axis(1, at = x1[x1 %% 2 == 0], labels = x1
浏览 3提问于2015-09-11得票数 3
回答已采纳
我试图在R中创建一个闪亮的应用程序，这使我们可以选择从不同的地块列表中选择一个地块，并在底部区域中显示所选的一个，但是当我启动它时，我会得到以下错误消息：
Warning in charToRaw(enc2utf8(text)) :
argument should be a character vector of length 1
all but the first element will be ignored
源代码如下：
library(shiny)
library(ggplot2)
library(faraway)
# Define UI for application that
浏览 0提问于2018-06-26得票数 0
回答已采纳
是否有可能通过expression()在ggplot2中获得偏导数符号，例如用于轴标签？
我指的是这个符号，通常也被称为'del‘或'curly d'：
它有unicode号U+2202，但是当我试图将它包含在ggplot中时，它失败了：
a <- b <- rnorm(100)
plot.df <- data.frame(a,b)
ggplot(plot.df,aes(a,b)) +
geom_point() +
xlab(expression('\u2202'))
比较而言，使用例如带有unicode编号的加
浏览 5提问于2020-04-04得票数 4
回答已采纳
1回答
我正在创建一个图，我想在其中显示平均值。我成功地同时显示了平均值及其对应的值，但是我发现图中的平均值太混乱了，所以我想使用ggrepel::geom_label_repel以文本标签的形式显示方式，而文本标签离数据点有点远。我尝试了一些不起作用的东西，如果有人能帮我找到我想要的结果，我会很感激。谢谢。
library(ggplot2)
#> Warning: package 'ggplot2' was built under R version 3.4.3
library(ggrepel)
#> Warning: package 'ggrepel'
浏览 0提问于2018-02-10得票数 0
回答已采纳
我正在使用ggplot2创建一个简单的步骤图。如果我将文件类型从PNG切换为PDF，绘图不会显示标签、记号、标题或图例。我哪里做错了？
数据：
plotData <- structure(list(iteration = c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L), time = c(0L, 10L,
20L, 30L, 40L, 50L, 60L, 70L, 80L, 90L, 100L, 0L, 10L, 20L, 30L,
40L, 50L, 60L, 70L),
浏览 41提问于2012-11-01得票数 1
如何使用ggplot2将示例ID (行号)作为标签添加到LDA绘图中的每个点？
谢谢
剧本：
require(MASS)
require(ggplot2)
data(iris)
irisLda <- lda(iris[,-5],iris[,5])
irisLda <- lda(Species~.,data=iris)
plot(irisLda)
irisProjection <- cbind(scale(as.matrix(iris[,-5]),scale=FALSE) %*% irisLda$scaling,iris[,5,drop=FALSE])
p
浏览 4提问于2013-11-25得票数 4
回答已采纳
我正在开发一个软件包，它将使我公司的其他用户更容易使用ggplot2。我想做的事情之一是添加一个函数，自动格式化丑陋的变量名到漂亮的标题。
我已经有了这样的功能了。让我们假设有一些虚构的数据和一个基本的情节：
data <- data.frame(
place_name = c("Los Angeles","New York"),
some_amount = c(5,10)
)
g <- ggplot(data, aes(x = place_name, y = some_amount)) +
geom_bar(stat = 'i
浏览 2提问于2017-11-17得票数 1
回答已采纳
1回答
我有XY数据(高维数据的2D tSNE嵌入)，我想要scatter plot。数据被分配给几个cluster，所以我想用cluster对点进行颜色编码，然后为每个cluster添加一个标签，该标签与cluster的颜色编码相同，并且位于cluster点的外部(尽可能多)。
是否知道如何使用R在ggplot2、ggrepel或plotly中完成此操作？
下面是示例数据( XY坐标和cluster赋值在df中，标签在label.df中)及其ggplot2部分：
library(dplyr)
library(ggplot2)
set.seed(1)
df <- do.call(rbind,la
浏览 0提问于2018-07-01得票数 5
回答已采纳
2回答
我使用拼图来组装用ggplot2制作的地块。我还使用修补程序的plot_annotation()命令自动注释集合的情节--例如，自动将"A“、"B”等放在每个情节的右上角。在大多数情况下，这是很容易做到的。但是，当地块在不同位置上有轴标签时，很难在正确的位置得到注释。下面是这个问题的一个很小的例子：
library(ggplot2)
library(patchwork)
pLeft <- ggplot(mtcars) +
geom_point(aes(mpg, disp)) +
scale_y_continuous("Left-hand panel&
浏览 3提问于2021-09-05得票数 3
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
