拼接运算符！使用ggplot的aes失败
拼接运算符是一种用于将多个字符串或字符向量连接在一起的运算符。在R语言中，常用的拼接运算符有paste()和paste0()函数。
paste()函数可以将多个字符串或字符向量按照指定的分隔符连接在一起，并返回一个新的字符向量。例如，paste("Hello", "World", sep = ", ")将返回"Hello, World"。paste0()函数与paste()函数类似，但不使用分隔符。例如，paste0("Hello", "World")将返回"HelloWorld"。
在使用ggplot的aes函数时，如果出现失败，可能是由于拼接运算符的使用不正确。请确保在拼接运算符中使用的对象是字符类型，并且使用正确的拼接运算符函数。
以下是一个示例，展示如何使用拼接运算符在ggplot中正确使用aes函数：
library(ggplot2)
# 创建一个数据框
data <- data.frame(
x = c(1, 2, 3),
y = c(4, 5, 6)
)
# 使用paste函数拼接字符串
title <- paste("Scatter Plot of", "x", "vs", "y")
# 创建散点图
ggplot(data, aes(x = x, y = y)) +
geom_point() +
labs(title = title)在上述示例中，我们使用paste()函数将字符串拼接为一个标题，并将其传递给labs()函数的title参数，以设置散点图的标题。
对于ggplot的aes函数失败的情况，可能还有其他原因，比如数据类型不匹配、变量名错误等。在解决问题时，建议逐步检查代码，确保每一步都正确执行，并且数据和变量的类型、名称等都是正确的。
关于拼接运算符和ggplot的aes函数的更多信息，可以参考以下链接：
相关·内容
2回答
我试图一次绘制多个因素列，使用ggplot2作为绘图引擎。
绘制多个度量列是直接的：
library(ggplot2)
library(dplyr) # dplyr 0.5.0 select_if
library(purrr)
data(diamonds)
diamonds %>%
select_if(is.numeric) %>%
gather %>%
ggplot(aes(x = value)) +
geom_histogram() +
facet_wrap(~key)
然而，我没有成功地在一次绘制多因素(定性)列。我希望以编程
浏览 4提问于2016-07-04得票数 3
回答已采纳
我想把这个代码变成： library(ggplot2)
ggplot(mtcars, aes(x = cyl, fill = stat(x))) +
geom_histogram(binwidth = 1) +
scale_fill_gradient(low = 'blue', high = 'yellow') 转换成如下所示的函数： library(ggplot2)
plotfn <- function (data, col_interest) {
g <- ggplot(data, aes_(x = col_interest, fi
浏览 14提问于2020-04-02得票数 0
回答已采纳
1回答
我想创建一个“像”ggplot2的aes()函数一样的函数。我的尝试失败了，错误是"Object not found“：
library(ggplot2)
data <- data.frame(a=1:5, b=1:5)
# Works
ggplot(data) + geom_point() + aes(x=a, y=b)
my.aes <- function(x, y) { aes(x=x, y=y) }
# Fails with "Error in eval(expr, envir, enclos) : object 'x' not fou
浏览 0提问于2013-01-16得票数 1
回答已采纳
是否可以在ggplot对象之外以绘图方式存储工具提示信息？例如，我想从这个开始： library(tidyverse)
library(plotly)
p1 <- mtcars %>%
ggplot(aes(x = mpg, y = hp, text = paste0("<b>MPG: </b>", mpg, "<br>",
"<b>HP: </b>", hp))) +
ge
浏览 11提问于2021-04-02得票数 1
回答已采纳
我想要构建一个函数，在那里我可以将一个变量名作为一个字符串传递给我，它将返回一个ggplot对象。
这个方法很有效：
myplot <- function(x, y) {
ggplot(data, aes_string(x="x", y="y")) + geom_bar()
}
但是在ggplot文档中：
It是这样写的(我引用)：“我推荐使用aes_()”和，所有这些函数都是软推荐的。请使用整洁的评估习语来代替“”。
但在那一刻，我发现我不知道如何使用aes_ (像上面那样构建一个例子，我也不知道如何引用、引用、准引用。网上有很多关于这方面的文献，但
浏览 3提问于2020-12-12得票数 2
回答已采纳
2回答
我想将一个引用的字符串传递给一个调用ggplot2的函数。
library(magrittr); library(ggplot2)
g1 <- function( variable ) {
ggplot(mtcars, aes_string("wt", variable, size="carb")) +
geom_point()
}
g1("mpg")
这很好，但是提倡准报价和NSE aes()。
所有这些功能都是软推荐的。请使用整洁的评估习惯用法(请参阅aes()文档中的准引号部分)。
但是使用NSE (即，g1(mp
浏览 2提问于2019-03-13得票数 11
回答已采纳
在R中，我得到了以下两个步骤的输出：
ggplot(mario_kart, aes(y = totalPr, x = duration, color=cond)) + geom_point() + geom_smooth(method = "lm", se = 0)
ggplot(mario_kart, aes(y = totalPr, x = duration, color=cond)) + geom_point() + geom_line(data=broom::augment(lm(totalPr~duration+cond,data=mario_kart)),
浏览 4提问于2017-12-26得票数 1
回答已采纳
我想最终做到这一点：
library(ggplot2)
density=TRUE
if (density) {ggplot(diamonds,aes(x=price)) + geom_histogram(aes(y=..density..),binwidth=1000) + facet_wrap(~color)
} else ggplot(diamonds,aes(x=price)) + geom_histogram(aes(y=..count..),binwidth=1000) + facet_wrap(~color)
但是我想对"..count..“使用变量名。或者&
浏览 1提问于2013-06-04得票数 2
回答已采纳
由于某些原因，当代码被分成多行时，ggplot很难运行。例如，下面这行代码将运行(但很长，很难处理)：
ggplot(mapping = aes(x = weight, y = horsepower)) + geom_point(size = 3) + labs(x = "Vehicle weight (lbs.)", y = "Engine Horsepower") + ggtitle("Weight vs. Horsepower")
但是，这些符合tidyverse样式指南的代码行不会运行：
ggplot(mapping = aes(x =
浏览 24提问于2018-09-09得票数 0
回答已采纳
考虑以下简单示例：
df <- data.frame(
a = rep(c('a','b','c'),3),
b = as.Date(rep(c('2011-01-01','2011-02-01','2011-03-01'),3)),
c = rnorm(9),
d = rep(1:3,each=3)
)
str(df)
ggplot(df, aes(x=d, y=c)) + geom_line(aes(group=b)) + facet_wrap(~a)
ggplo
浏览 10提问于2013-10-17得票数 4
回答已采纳
1回答
绘制等高线图时，"..level..“在代码中使用。
ggplot(faithful, aes(eruptions, waiting)) + stat_density2d(aes(colour = ..level..))
绘制条形图时，"..count..“是使用的。
x <- sample(c('A','B','C','D'), size = 1000, replace= TRUE, prob = c(0.2,0.3,0.3,0.2))
y <- rnorm(1000) * 1000
df = da
浏览 0提问于2018-07-16得票数 0
我有一个分类(因素变量)年龄与不同的年龄组，我正在创建下面的条形图。(已加载所有库)
tl=table(df$Age)
df1=as.data.frame(tl)
p=ggplot(data = df1,mapping = aes(x = Var1, y = Freq))+geom_bar(stat="identity")
p=p+geom_text(aes(label=Freq), vjust=-0.3, size=3.5)
p=p+theme(axis.text.x = element_text(angle = 90))
p=p+labs(y="Y", x=
浏览 3提问于2021-12-27得票数 0
回答已采纳
1回答
我有以下代码：
library(ggplot2)
ggplot(cars, aes(x = speed, y = dist)) +
geom_line()
创建下面的图
我想要做的是将x轴(speed)值：5,10,15,20,25替换为以下向量：c("-5000", "-2500", "FOO", "2500", "5000")。
但为什么失败了？
ggplot(cars, aes(x = speed, y = dist)) + geom_line() +
scale_x_discr
浏览 0提问于2018-03-19得票数 3
回答已采纳
我正在制作一个应用程序，用户可以使用varSelectInput从数据框名称列表中选择x和y轴，以及他们想要的方面变量。我尝试了许多不同的方法，我在stackOverflow上看到了建议，但在我的情况下，它们中的任何一种都不起作用。下面是包含每个变量的输入‘s的renderUI代码。 output$descrxaxis_Variable <- renderUI({
varSelectInput(inputId = "descrxaxis", label = "Choose x axis variable", data = descrD
浏览 18提问于2020-10-10得票数 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回答
我试图在一个.中使用一个论点位置持有者ggplot()。但由于某些原因我不完全确定它不起作用。
我所做的是(使用来自ggplot2/the tidyverse的示例数据)：
library(tidyverse)
library(magrittr)
corr_eqn <- function(x, y, digits = 2) {
corr_coef <-
round(cor(x, y, use = "pairwise.complete.obs"), digits = digits)
paste("r = ", corr_coef)
}
浏览 0提问于2020-05-21得票数 4
回答已采纳
当在函数中放置图时，我会有一些奇怪的行为(在R的0.99.484中使用ggplot和R)。
我不明白为什么不能使用本地作用域变量来生成绘图。也许你可以启发我，告诉我正确的方法。
下面是一个小代码片段，它复制了我的麻烦：
# This works:
x1 <- seq(0,90,10)
ggplot() + geom_line(aes(x=x1,y=x1))
# This yields error below:
f1 <- function() {
x2 <- seq(0,90,10)
ret <- ggplot() + geom_line(aes(x=x2,y
浏览 0提问于2015-11-15得票数 0
回答已采纳
是否有一种方法可以使用coord_cartesian()来修改绘图坐标，这种方式是基于ggplot调用中的数据的动态的？
例如：
ggplot(cars, aes(x = speed, y = dist)) +
geom_point() +
coord_cartesian(xlim = c(min(.$speed), max(.$speed) + 10))
这不起作用，使用.data$speed也不起作用。
浏览 6提问于2017-08-07得票数 3
回答已采纳
在ggplot2 2/geom_density中，我想用‘黄色’填充wt >4的区域，但是它失败了(有些区域不是在>4，填充颜色也是黄色的)。如附件所示)。有人能帮忙吗？谢谢!
library(tidyverse)
mtcars %>% ggplot(aes(x=wt))+
geom_density(aes(fill=if_else(wt<4,'red','yellow')))
浏览 7提问于2022-01-24得票数 0
回答已采纳
我想要删除在中生成的合唱团区域之间的线。我的问题的动机是一个非常大的地图，非常小的地区(人口普查块组)，是如此之多，它是不可能看到的颜色填充形状，鉴于边界的密度。我在Mac上使用更新的RStudio，ggplot2版本为1.0.0；在ggplot2上似乎没有出现同样的问题。
下面是示例(使用县)，每个县有不同的颜色，这样就不需要边框了。第一种是用紫色边框来强调。第二种是颜色= NA，这是我试图消除所有边界的失败尝试。
library("ggplot2")
library("maps")
tn = map_data("county", region
浏览 3提问于2014-09-16得票数 14
回答已采纳
我试着用两个形状和颜色不同的y变量绘制一张图，但我总是失败。 对我的错误之处有什么建议吗？ library (ggplot2)
library (forcats)
ggplot(mtcars, aes(x=disp, y=drat, group=as_factor(vs)))+
geom_point(aes(shape=as_factor(vs), color=as_factor(vs))) +
scale_shape_manual(values=c(21, 24))+
scale_fill_manual(values=c("black", "yello
浏览 11提问于2020-12-10得票数 0
回答已采纳
我正在尝试在ggplot2图中创建一个图例，该图包含一个负号作为指数(指数中没有其他字符)。但是，我不能理解plotmath的语法。
看起来下面的方法是可行的：
expr1 <- expression(paste("text", main[sub]^{-}))
ggplot(mpg, aes(x=cty, y=hwy, colour=drv)) + geom_point() +
scale_colour_discrete(labels=c(expr1, "b", "c"))
(如果我们说expr1 <- expression(p
浏览 2提问于2012-11-30得票数 4
回答已采纳
1回答
我想知道是否有人知道如何在一个情节的标题中打印两个或更多的不平等标志。请注意，我知道如何在标题中打印一个不等式符号。参见下面的示例代码：
library(ggplot2)
df <- data.frame(x = rnorm(10), y = rnorm(10))
basic.plot <- ggplot(data = df, aes(x = x, y = y)) +
geom_point()
main <- substitute(alpha * " " != 0)
plot <- basic.plot + ggtitle(bquote(atop
浏览 1提问于2015-11-30得票数 2
回答已采纳
我需要在一个函数中运行ggplot。传递给函数的输入data.frame/tibble包含特殊字符(空格、逗号等)。在包含要绘制数据的列中。要绘制的列名作为参数传递给函数。这是一个有效的例子，aes_和aes_string都失败了，但原因不同。感谢您的帮助
trial.tbl_df <- tibble(a = 1:3, `complex, `=4:6)
plotfunc <- function(tbl2plot,yvar){
ggplot(tbl2plot,aes_(x = "a", y = yvar )) +
geom_point()
}
p
浏览 9提问于2021-10-13得票数 0
2回答
等宽的
、、、
如何使用ggplot使几个条形图之间的条幅和间距固定，每个图上有不同数量的条形图？
下面是一个失败的尝试：
m <- data.frame(x=1:10,y=runif(10))
ggplot(m, aes(x,y)) + geom_bar(stat="identity")
ggplot(m[1:3,], aes(x,y)) + geom_bar(stat="identity")
将width=1添加到geom_bar(...)也于事无补。我需要第二个图形自动有较小的宽度和相同的条形宽度和空格与第一个。
浏览 1提问于2013-08-25得票数 8
回答已采纳
1回答
有人能告诉我为什么第二次阴谋失败了吗？如何更改数据表中的字符串列并使用ggplot？
dt = data.table(name = c("aaa", "bbb", "ccc"), value = 1:3)
ggplot(dt) + geom_point(aes(x = name, y=value)) # this works
dt[, name := lapply(name, function (x) substring(x, 2) )]
dt
name value
1: aa 1
2: bb 2
3: cc
浏览 6提问于2015-11-22得票数 1
回答已采纳
考虑下面的例子
require(ggplot2)
ggplot(iris, aes(Sepal.Length, Sepal.Width, color = Petal.Length)) +
geom_point(size=.1) +
coord_fixed()
由于我想构建许多类似的图，所以我想将点层和坐标系配置抽象为一个小辅助函数：
my_helper = function(pointSize=.1){
geom_point(size=pointSize) +
coord_fixed()
}
ggplot(iris, aes(Sepal.Length, S
浏览 587提问于2019-07-09得票数 1
回答已采纳
2回答
我正在努力让表达式来传达像10<=VarName<120这样的东西。为什么下面的代码会失败？ starwars %>%
filter(between(birth_year, 10, 120)) %>%
ggplot(aes(x=mass, y=height)) +
geom_point() +
labs(title=expression(10<="Birth Year"120)) 请注意，仅此一项即可工作(末尾没有120 )： starwars %>%
filter(between(birth_year, 10,
浏览 28提问于2021-02-03得票数 0
回答已采纳
数据数据由两个因素变量组成:三个级别的cls和两个级别的subset。我想比较一下每个类(cls)在subset的两个组中有多少。我想在y轴上显示百分比。它们应该在某些subset组中计算，而不是在整个数据集中计算。
library(tidyverse)
data = data.frame(
x = rnorm(1000),
cls = factor(c(rep("A", 200), rep("B", 300), rep("C", 500))),
subset = factor(c(rep("train", 900),
浏览 1提问于2022-07-05得票数 0
回答已采纳
1回答
我正在用ggplot2生成pdf报告。代码如下所示
pdf()
for (){
p <- ggplot(..)
print(p)
}
dev.off()
有时，由于数据质量的原因，ggplot无法生成绘图。可能有多种原因，我们不想检查所有可能的数据失败组合。我们只想检查ggplot是否失败，然后继续。这就是我想出来的-这很管用，但也有一些问题。
library(ggplot2)
p <- ggplot(mtcars, aes(wt, mpg)) +
geom_point()
p.bad <- ggplot(mtcars, aes(wt, as.ch
浏览 2提问于2013-09-04得票数 0
回答已采纳
2回答
我一直在为autoplot定义S3方法。
我有以下内容(完整代码)：
#' Autoplot for bigobenchmark object
#'
#' @importFrom ggplot2 autoplot
#'
#' @param object
#'
#' @return A ggplot2 plot
#' @export
#'
#' @examples
#' # Create plot for benchmarks
#' library(ggplot2)
#' bench <
浏览 9提问于2018-04-18得票数 6
这本身并不一定是regex，但是如何从包中提取以下格式的函数呢？
test<-"Aes"
test<-tolower(test)
ggplot2::test
这是因为“测试”不能被识别为ggplot2导出的函数，所以失败了。
错误：“test”不是从“命名空间:ggplot2‘2”导出的对象
怎样才能解决这个问题呢？
谢谢!
浏览 0提问于2019-02-08得票数 1
回答已采纳
2回答
我想把y-var放大，把它乘以一个数字，比如说10。问题是，这是在一个闪亮的应用程序和变量必须作为字符串传递，即input$variable。
如何将aes_string()中的一个变量与aes()中的变量相乘？下面是一个失败的例子：
library(ggplot2)
ggplot(data = subset(mtcars, cyl == 4), aes_string(x = "wt", y = "mpg")) +
geom_line(size = 1.5, color = "#00868B") +
geom_li
浏览 1提问于2018-06-06得票数 1
回答已采纳
1回答
我试图将类别和百分比添加到堆栈栏中的每个级别，例如：
Category <- c(rep(c("A", "B", "C", "D"), times = 4))
Data <- data.frame( Category)
p= ggplot(Data,aes(x=factor(""),fill=factor(Category)))+
geom_bar(position="fill")+
geom_text(aes(label=scales::percent(..cou
浏览 2提问于2021-01-08得票数 2
回答已采纳
1回答
我用python2.7ggplot做了一个散点图。我想要钢蓝色的背景，但强调了一些点，但失败了。有人能在这方面帮我吗。
代码片段：
from ggplot import *
chart = ggplot( df_color, aes(x='x-tsne', y='y-tsne') )\
+ geom_point(color='steelblue',size=70,alpha=0.8)\
+ geom_point(data=df_color.loc[self.GoI,:],aes(
浏览 9提问于2017-12-14得票数 0
回答已采纳
我想要的一般解决方案是能够独立地为每个方面指定任意的轴限值。
基本功能是通过设置标度来获得的。例如：
ggplot(diamonds, aes(x = carat, y = price)) + geom_point() + facet_wrap(~clarity, nrow = 4, ncol = 2, scales = "free")
这实际上是一个非常好的特性，但在实践中并不总是那么有用。通常，我们想要的是在同一轴上有可比较的变量子组。作为一个玩具的例子，考虑上面的钻石案例。我们可能希望第一列中的所有面都有相同的轴限值，而第二列中的所有面都有相同的轴限值(但与第一列不同)。
浏览 2提问于2016-08-30得票数 2
2回答
我最近开始使用R，并与我们班正在使用的ggplot混淆。我习惯于只添加两个输出的+操作符，但我看到在ggplot中您可以这样做：
ggplot(data = bechdel, aes(x = domgross_2013)) +
geom_histogram(bins = 10, color="purple", fill="white") +
labs(title = "Domestic Growth of Movies", x = " Domestic Growth")
在这里，我们将两个函数调用一起添加。这里到底发生了什
浏览 8提问于2022-01-19得票数 0
回答已采纳
2回答
我正在努力编写一个非常简单的包装器来为不同的变量生成图。假设我的数据是：
data <- tibble(year = seq(2001,2015),var1 = rnorm(15, mean=2), var1_sd = rnorm(15, mean=1, sd=0.8), var2 = rnorm(15, mean=7), var2_sd = rnorm(15, mean=1, sd=0.15))
我想要做的是
ggplot(data,aes(x=year, y=var1)) +
geom_pointrange(aes(ymin=var1-var1_sd, ymax=var1+
浏览 2提问于2020-01-09得票数 1
回答已采纳
我在吸毒！(拼接运算符/大爆炸运算符)用于ggplot2::geom_point()函数，结果失败。有人能指出这个代码有什么问题吗？下面的代码尝试从字符向量执行ggplot2函数。
library(rlang)
library(ggplot2)
data(mtcars)
data = mtcars
assoc = c( "cyl" , "hp" )
names(assoc) = c("x", "y")
assoc_lang = rlang::parse_exprs(assoc)
gg = ggplot2::ggplot(dat
浏览 2提问于2021-12-02得票数 5
回答已采纳
1回答
我有一个R命令如下。
library(ggplot2)
df <- read.csv(file="c:\\query.csv"))
ggplot(df) + )
geom_point(aes(Time, Users)) +)
geom_point(data=df[df$Users>30,], aes(Time, Users),)
pch=21, fill=NA, size=4, colour="red", stroke=1) +)
theme_bw())
上述命令中使用的CSV文件有列，如Time、used、Se
浏览 1提问于2016-08-01得票数 0
回答已采纳
我有一些ggplot代码，在0.8.9中工作得很好，但在0.9.1中就不行了。
我将在theDF中绘制数据，并想在xintercept="2010 Q1."上绘制一条垂直线，theGrid仅用于创建theDF。
theGrid <- expand.grid(2009:2011, 1:4)
theDF <- data.frame(YrQtr=sprintf("%s Q%s", theGrid$Var1, theGrid$Var2),
Minutes=c(1000, 2200, 1450, 1825, 1970,
浏览 2提问于2012-06-19得票数 7
我的目标是编写一个自定义的geom_方法来计算和绘制图，例如，置信区间，这些应该被绘制成多边形或线。现在的问题是，在哪里检查哪一种“风格”应该被标出？
到目前为止，我已经尝试了三种不同的方法，
GeomLine. (i)为行和多边形样式图编写两种不同的geom_/stat_，(ii)编写一个使用自定义GeomMethod的geom_/stat_，<code>H 210</code><code>H 111</code>(Iii)编写一个单独的geom_/<code>d13<//code>，它要么使用GeomPolygon，要
浏览 1提问于2021-10-06得票数 1
自从切换到ggplot2 2.0.0之后，在定义aesthetics之外的瓷砖的width和height时会出现问题。我使用geom_tile来创建某种热图，我希望在两个块之间有一点空间，所以我在ggplot2的旧版本中使用了width=.9和height=.9参数，但是在新版本中失败了。
df <- data.frame(x=letters[1:10], y=rep(LETTERS[1:10], each=10), value=runif(100))
ggplot(df, aes(x, y, fill=value)) + geom_tile()
ggplot(df, aes(x, y,
浏览 3提问于2016-01-25得票数 2
回答已采纳
2回答
在管道中使用ggplot后可以执行summarise吗？这个变量并不是很重要，我只是出于探索的目的而观察这个变化。因此，我并不是真的想保存这个变量。
df %>%
mutate(change = t2 - t1) %>%
ggplot(aes(x = change)) +
geom_histogram() %>%
summarise(mean_change = mean(change))
Error in UseMethod("summarise_") : no applicable meth
浏览 0提问于2017-12-11得票数 1
geom_col I希望将相应的值标签放置在每个条形段中间的叠加条形图中。
然而，我天真的尝试失败了。
library(ggplot2) # Version: ggplot2 2.2
dta <- data.frame(group = c("A","A","A",
"B","B","B"),
sector = c("x","y","z",
浏览 4提问于2016-11-21得票数 32
回答已采纳
2回答
我正在尝试解决如何在轴标签中使用下标字母。
dat <- data.frame(x = rnorm(100), y = rnorm(100))
ggplot(dat, aes(x=x,y=y)) +
geom_point() +
labs(y=expression(Blah[1]))
dat <- data.frame(x = rnorm(100), y = rnorm(100))
ggplot(dat, aes(x=x,y=y)) +
geom_point() +
labs(y=expression(Blah[1d]))
第一个例子工作，因为它只
浏览 4提问于2013-06-27得票数 78
回答已采纳
我正在尝试创建两个图:一个是整个数据集中的一个，也是一个被“站点”分组因子分割时的平均值图。
以下是源数据：
site.data <- structure(list(site = structure(c(1L, 1L, 1L, 1L,1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L, 3L, 3L),
.Label = c("ALBEN", "ALDER", "AMERI"), class = "factor"),
year = c(5L, 10L, 20L,
浏览 6提问于2015-02-23得票数 4
回答已采纳
我写了一段代码：
ggplot(mpg, aes(displ, hwy)) +
geom_point() +
facet_wrap(~drv)
下面是输出：
如您所见，这里有三个方面，因为在列"dev“中有三种类型的值。现在，我想得到相同的图，但只有"f“和"r”两种类型。因此，它必须看起来完全像上面的一个，但没有第一个面"4“。我怎么能这么做呢？我试过了，但不起作用：
ggplot(mpg, aes(displ, hwy)) +
geom_point() +
facet_wrap(~drv==c("f", "r&#
浏览 3提问于2020-08-18得票数 0
我正在尝试使用plotly构建一个交互式图表，但它无法显示geom_line()，而且我也不确定原因。这不是我的确切示例，但即使是plotly的网页上提供的示例也失败了。这就是它：
library(plotly)
datn <- read.table(header=TRUE, text='
supp dose length
OJ 0.5 13.23
OJ 1.0 22.70
OJ 2.0 26.06
VC 0.5
浏览 3提问于2016-09-30得票数 2
1回答
我也想
在某些层上绘制所有数据
(这里: geom_point)
只在其他层上绘制子集
(此处：“range”类型的geom_text )
然而，我得到了整个数据的文本标签，而它们只应该被添加到绿松石点。
我尝试对数据进行细分，但输出结果并不理想。尽管如此，对象sub_data只保存想要的数据。
有什么建议吗？
R代码：
library(ggplot2)
N <- 10
# create 20 = 2*10 data points
test_data <- data.frame(
idx <- c( 1:N, 1:N ),
vals <-
浏览 2提问于2014-07-17得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
