R ggplot2防止vline出现在空的ggridge中
R ggplot2是一个用于数据可视化的强大工具包。它提供了丰富的图形语法和灵活的绘图功能，可以帮助用户创建各种类型的图表。
在ggplot2中，vline是用于绘制垂直线的函数。当使用ggridge包绘制密度图时，有时会出现vline出现在空的ggridge中的情况。为了防止这种情况发生，可以采取以下措施：
- 数据预处理：在绘制ggridge图之前，对数据进行预处理，确保不会出现空的ggridge。可以通过删除空值或者进行数据填充来处理空值。
- 数据过滤：在绘制ggridge图之前，对数据进行过滤，只选择非空的数据进行绘制。可以使用ggplot2中的filter函数或者dplyr包中的filter函数来实现数据过滤。
- 添加条件判断：在绘制vline时，添加条件判断语句，确保vline只在非空的ggridge中出现。可以使用if语句或者ifelse函数来实现条件判断。
- 调整图层顺序：在绘制ggridge图时，可以调整图层的顺序，将vline图层放在非空的ggridge图层之后。可以使用ggplot2中的layer函数或者ggplot函数中的layers参数来调整图层顺序。
总结起来，为了防止vline出现在空的ggridge中，可以通过数据预处理、数据过滤、添加条件判断和调整图层顺序等方法来解决。具体的实现方式可以根据具体情况进行选择和调整。
关于R ggplot2和ggridge的更多信息，可以参考以下链接：
- ggplot2官方文档：https://ggplot2.tidyverse.org/
- ggridge官方文档：https://cran.r-project.org/web/packages/ggridges/index.html
相关·内容
我用R和ggplot2创建了下面的图
KL_tot_RM = c(19.95814, 19.82527, 19.59050, 19.54873, 19.52221, 19.51316, 20.69058,
20.40126, 19.85393, 19.70881, 19.59630, 19.55224, 21.07645, 20.75875,
20.09839, 19.88498, 19.69226, 19.60695, 21.87141, 21.53600, 20.77132,
20.46374, 20.10521, 19.89015, 22.15567, 21.82590, 2
浏览 4提问于2022-10-11得票数 1
回答已采纳
2回答
我正在尝试创建一个图表来显示ggplot2中的单个案例研究。已经创建了其他R包来处理这类数据，但我更愿意使用ggplot2。所以这是我的问题。
这是一个非常基本的图表，但我想分开线连接所有的点在两个部分，基于相位。所以前8个点应该用一条线连接，然后这条线应该停下来，然后从点9连接到最后一个点。在geom_vline中绘制垂直线时应使用相同的信息。
library(ggplot2)
Phase <- c("A", "A", "A", "A", "A", "A", "A", &#
浏览 1提问于2018-08-11得票数 0
回答已采纳
我想用R中的ggplot2包创建直方图，并添加垂直线来显示均值-sd和mean+sd。
我正在使用下面的代码
iris %>%
ggplot(aes(Sepal.Length)) + geom_histogram() + theme_bw() +
geom_vline(xintercept = mean(iris$Sepal.Length) - sd(iris$Sepal.Length), linetype = "dashed") +
geom_vline(xintercept = mean(iris$Sepal.Length), linetype =
浏览 153提问于2020-02-20得票数 0
回答已采纳
1回答
我想要绘制一个密度图的数字，保存它，并呈现在闪亮的应用程序。我想动态添加到图形中的是从输入中输入的一行，显示新输入的变量位于密度图中的位置:我将ggplot图形从虹膜数据中保存为：
library(ggplot2)
twoClassIrisSepalLength <- subset(iris[1:100,], select=c("Species","Sepal.Length"))
twoClassIrisSepalLength$Species <- factor(twoClassIrisSepalLength$Species)
g <- g
浏览 3提问于2015-11-26得票数 0
回答已采纳
1回答
垂直中心线
、、
对于下面的示例，让我在x轴的值1处添加一条垂直中线。我尝试过geom_estci()，但我的R没有找到geom_estci函数。我安装了库ggplot2和扫帚。我试着安装ggepi库。但对R版本3.6.1不起作用。对于下面的示例，如何在x=1添加垂直中心线？
d=data.frame(drink=c("coffee","tea","water"), mean=c(3,6,2), lower=c(2.6,5.6,1.8),
upper=c(3.5,6.3,2.8))
ggplot() +
geom_errorbarh(data=
浏览 1提问于2019-11-27得票数 0
回答已采纳
基础知识:使用R统计软件、ggplot2、geom_vline和geom_histogram来可视化一些数据。图例密钥有问题。
我正在尝试从一些随机模拟中绘制一对直方图，并在该直方图的顶部绘制几条线，表示确定性模拟的结果。我已经绘制了数据，但是直方图的图例键中间有一条不必要的黑线。你能帮我去掉那些黑线吗？下面是一些重现该问题的示例代码：
df1 <- data.frame(cond = factor( rep(c("A","B"), each=200) ),
rating = c(rnorm(200),rnorm(200
浏览 0提问于2013-02-19得票数 4
回答已采纳
我使用虹膜数据，并希望在密度图中为闪亮的flex仪表板中的每个物种使用geom_vline添加95%的数据线。但收到错误消息。有没有人能说出代码中有什么地方不正确呢？感谢下面的代码：
---
title: "Untitled"
output:
flexdashboard::flex_dashboard:
orientation: columns
vertical_layout: fill
runtime: shiny
---
```{r setup, include=FALSE}
库(Flexdashboard)
#初始化
库(数据集)
库(Ggplot2)
#helper
浏览 0提问于2016-11-19得票数 0
1回答
我正在尝试修复一个图例，以便在ggplot中不会出现由geom_vline引起的交叉。我知道我的例子作为一个情节没有多大意义，但我只是想要一个快速可重复的例子。
library(ggplot2)
ggplot(diamonds)+
geom_point(aes(x = carat, y = depth, colour = "depth"), pch = 4)+
geom_line(aes(x = carat, y = table, colour = "table"))+
geom_vline(aes(xintercept = 2, colour =
浏览 56提问于2018-09-10得票数 2
回答已采纳
我有一些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
在说服python-ggplot在不同的面板中使用不同的vline时出现问题。R的建议了一种这样做的方法，我试图在这里遵循：
df = pd.DataFrame({'x': np.random.random(size = 200), 'y': np.random.random(size = 200), 'cat': np.random.randint(0, high = 4, size = 200)})
vlines = pd.DataFrame({'z': [0.25, 0.375, 0.5, 0.75], 'vs&#
浏览 0提问于2014-06-06得票数 2
2回答
在R ggplot2中，如何在列之间绘制垂直线 使用'geom_vline(xintercept=as.numeric(plot_data$mperiod)+0.5)‘，它不能工作 plot_data <- data.frame(mperiod=paste0('Q',1:4),amount=c(1:4))
plot_data %>% ggplot(aes(x=mperiod,y=amount))+
geom_bar(stat='identity')+
geom_vline(xintercept=as.numeric(plot_dat
浏览 145提问于2021-09-10得票数 2
回答已采纳
我想在使用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
回答已采纳
我在网上找到了这个教程，它可以帮助将ggplot2的geom_abline()转换为Plotly图：https://plotly.com/ggplot2/geom_abline/ 看起来我们可以简单地使用ggplotly()进行这样的转换 library(ggplot2)
library(plotly)
p <- ggplot(data, aes(x=x_val, y=y_val, colour=color_val)) +
geom_point() +
geom_vline(aes(xintercept=xintercept_val), colour=color_val)
浏览 12提问于2020-05-04得票数 1
回答已采纳
1回答
我感兴趣的是只在功能区附近包含面板网格线的方法--我可以在一个简单的示例中手动完成此操作
library(ggplot2)
d1 <- data.frame(x = seq(0, 1, length.out = 200))
d1$y1 <- -3*(d1$x-.5)^2 + 1
d1$y2 <- -3*(d1$x-.5)^2 + 2
ggplot(d1) +
geom_ribbon(aes(x, ymin = y1, ymax = y2),
alpha = .25) +
geom_ribbon(aes(x, ymax = y1),
浏览 3提问于2015-09-05得票数 3
在用ggplot2创建饼图时，我无意中发现了极坐标图开始的奇怪行为。如果我们
dta <- data.frame(val = 1:60, col = rep(c(0,1), each = 10))
制作一个饼形图
library(ggplot2)
ggplot(dta, aes(x = val, y = 2, fill = factor(col), color = factor(col))) +
geom_col() +
coord_polar(start = 0)
我们最终得到了一张预期的饼图：
比如说，我们想在图表的中间创建一个小的甜甜圈洞，我们可以通过在中间加一个
浏览 5提问于2017-10-22得票数 3
回答已采纳
如果x轴中有一个geom_vline，我在添加factor时会遇到一些问题。我想把x_value转换成factor，并用x_line列画一条垂直线。
类似的职位可能是这样的。
但是，即使我遵循下面发布的解决方案，它也不起作用。
下面是这个问题的简短版本
df <- data.frame(x_value=c(rep(seq(1,5),2)), y_value=c(rnorm(10,5,1)),x_vline=3, gr=rep(c(1,2),c(5,5)))
> df
x_value y_value x_vline gr
1 1 6.589680
浏览 1提问于2018-05-25得票数 1
回答已采纳
我想在一个ggplot上画多条垂直线，它的位置来自一个单独的向量。
library(ggplot2)
carats <- c(2.5, 0.1)
ggplot(diamonds, aes(carat)) +
geom_histogram() +
geom_vline(aes(xintercept = carats[1]), col = "black", linetype = "dotted", size = 0.5) +
geom_vline(aes(xintercept = carats[2]), col = "black"
浏览 2提问于2016-12-10得票数 1
回答已采纳
我有这样的数据
PDATETIME <- c("2017-02-23 06:08:39","2017-02-25 15:31:50","2017-03-06 17:11:57","2017-03-15 01:23:51",
"2017-03-16 15:54:35","2017-03-16 23:48:14","2017-03-18 02:57:41","2017-03-20 05:12:33")
DELTA <- c(2.5
浏览 1提问于2019-02-06得票数 1
回答已采纳
我想在带有ggplot2中离散的x变量的盒子图中的两个主要网格之间添加一个垂直的小网格。
这是样本：
boxplot <- ggplot(data = mtcars ,aes(x = as.factor(cyl),y=wt, fill=as.factor(am))) + geom_boxplot()
boxplot
从可视化中可以看出，不清楚哪个框属于哪个x标签，因为主垂直网格在同一个x变量处将两个框分隔开来(这里可能不是问题，但是当存在许多x变量和窄框时，就会出现问题)。因此，我正在考虑在每个主要网格的中间添加一个小网格。我尝试使用ggplot2中的“小Gridd.x”，如下所示，但是
浏览 5提问于2022-06-25得票数 0
回答已采纳
我试图用几个不同层次的线条来使用ggplot，一个使用颜色图例，另一个使用线型图例。不幸的是，这两个层似乎都出现在两个传说中，如下所示：
hlines <- data.frame(Hline=c("a", "b"), y=c(-1,1))
vlines <- data.frame(Hline=c("x", "y"), x=c(-1,1))
ggplot() +
geom_hline(data=hlines,
aes(color=Hline, yintercept=y, linety
浏览 1提问于2016-05-05得票数 3
回答已采纳
我想制作下面的情节
x = seq(-3,3,0.005)
y = x**3
df = data.frame('x' = x, 'y' = y)
library(ggplot2)
ggplot(df, aes(x, y)) +
geom_line() +
geom_hline(yintercept = 0) + geom_vline(xintercept = 0) +
geom_vline(xintercept = c(-2,-1,0,2), lty = 'dashed', color = 'red')
浏览 4提问于2022-09-29得票数 0
回答已采纳
在使用ggplot2的R中，当使用facet_grid绘制密度图或直方图时，我们可以使用geom_text和geom_vline来绘制垂直线和编写注释。
在带有Seaborn的Python中，有没有类似的方法来执行这些任务？
例如，在下面的示例中，如何在每个子图的右上角添加文本"Mean:xxx"？如何为每个子图中的均值添加相应的垂直线？
import numpy as np
import seaborn as sns
import matplotlib.pyplot as plt
sns.set(style="darkgrid")
tips = sns.lo
浏览 11提问于2020-05-04得票数 0
回答已采纳
我正试图根据用户Didzis提供的慷慨代码，在chart中创建甘特图。我试图添加一条显示今天日期的垂直行，但是ggplot2包中的ggplot2层只返回Error: Discrete value supplied to continuous scale。这是我的代码：
today <- as.Date(Sys.Date(), "%m/%d/%Y")
library(scales)
ggplot(mdfr, aes(time,name, colour = is.critical)) +
geom_line(size = 6) +
浏览 1提问于2013-08-07得票数 3
回答已采纳
2回答
当我试图在不同的方面创建不同的geom_rect时，我得到了一些奇怪的行为。在下面的示例中，geom_point的颜色应该与geom_rect的填充颜色相同，后者应该与geom_rect的轮廓相同。然而，这些因素似乎正在以一种奇怪的方式连接在一起。
任何帮助都将不胜感激。
我不希望用序列对点进行着色，因为群集和序列并不总是相同的(用于可视化排列统计)。
这些显然不是我想要绘制的实际数据！
library(data.table)
library(ggplot2)
scatter.dt = data.table(sequence = factor(paste('Sequence'
浏览 4提问于2019-12-02得票数 1
回答已采纳
我是一个R初学者，我试着在论坛上搜索可能的答案，但是我还没有找到我的问题。如果我在某处遗漏了一些明显的描述，请道歉。
我想用不同的垂直截距在一页上绘制几个密度图，这些截距来自于我在我的数据中读取的不同数据frames.Thus，生成一个循环来计算99.分位数，然后将其设置为垂直截距。
library(reshape)
require (ggplot2)
library(plyr)
library(dplyr)
library(gridExtra)
示例数据生成
N=1000
rnorm2 <- function(n,mean,sd) { mean+sd*scale(rnorm(n)) }
浏览 0提问于2017-03-21得票数 1
我想添加一条垂直线来拆分facet_wrap面板在ggplot2中。
ggplot(mpg, aes(drv, hwy))+
geom_boxplot(aes(colour = drv))+
facet_wrap(~year)+
theme_bw()+
theme(panel.grid=element_blank())
我的问题是，当x是因子时，我们如何添加垂直线？
浏览 2提问于2018-05-31得票数 0
回答已采纳
1回答
我可以创建一个带有错误条的条形图，但是如何将标签放在较高的(vLABELH)和较低的错误条(vLABELL)上。
library(ggplot2)
vx <- c(1:5)
vBAR <- c(0.1,0.2,0.3,0.4,0.5)
vLINE1 <- c(0.15,0.25,0.35,0.45,0.55)
vLINE2 <- c(0.15,0.25,0.35,0.45,0.55)
vLINE3 <- c(0.05,0.15,0.25,0.35,0.45)
vLABELL<- c(0.05,0.15,0.25,0.35,0.45)
vLABELH <
浏览 5提问于2014-02-26得票数 4
回答已采纳
2回答
我正在使用以下代码绘制一张图：
library (ggplot2)
png (filename = "graph.png")
stats <- read.table("processed-r.dat", header=T, sep=",")
attach (stats)
stats <- stats[order(best), ]
sp <- stats$A / stats$B
index <- seq (1, sum (sp >= 1.0))
stats <- data.frame (x=index, y=s
浏览 3提问于2013-10-28得票数 62
回答已采纳
1回答
R 3.1.2/ggplot2_1.0.0/Windows7
如何在多面图形中添加两条带有图例的垂直线，而不改变线型？在下面的示例中，我无法从我正在编写的代码中获得我想像的图例(两条实线和一个执行图例)。一个可重复的例子：
library(ggplot2)
library(plyr)
library(e1071)
set.seed(89)
pm <- data.frame(pm10=rnorm(400, 150, 50), estacion=gl(4,100, labels = c('sur', 'norte', 'este', '
浏览 2提问于2015-04-18得票数 7
回答已采纳
1回答
我试图添加一条简单的线条，在ggplot2条形图中显示我的数据的中值和平均值。
这是我的代码
library(ggplot2)
library(plyr)
data <- c(1,1,1,2,2,2,2,2,2,3,3,4,5)
count_data<- count(data)
mean <- mean(count_data)
med <- median(count_data)
ggplot(count_data) +
geom_bar(aes(x=x, y=freq), stat="identity", position="dodg
浏览 4提问于2018-12-27得票数 0
回答已采纳
我试图在分发中强调一个特定的点。我使用的是geom_vline，它工作得很好，只是它超出了geom_density绘制的曲线。有没有办法把这条垂直线与geom_density画的曲线相交？
library(ggplot2)
mtcars$car <- rownames(mtcars)
javelin <- mtcars[mtcars$car == "AMC Javelin", ]
ggplot(mtcars) +
geom_density(aes(x = mpg)) +
geom_vline(data = javelin, aes(xintercept
浏览 3提问于2022-08-04得票数 1
回答已采纳
1回答
我使用下面的代码从两个向量模型1和模型2中获得两个直方图。我想让R对每个直方图拟合一条正常曲线。
library(ggplot2)
require(ggplot2)
require(reshape2)
set.seed(1)
df <- data.frame(x<-rnorm(1000,mean = 0.5, sd = 0.01),
y<-rnorm(1000,mean = 0.5, sd = 0.01))
df2 = melt(df)
ggplot(df2, aes(value, fill = variable)) + geom_hi
浏览 2提问于2014-01-06得票数 1
我正在使用ggplot2创建直方图的面板，并且我希望能够在每个组的平均值处添加一条垂直线。但是geom_vline()对每个面板使用相同的截距(即全局均值)：
require("ggplot2")
# setup some sample data
N <- 1000
cat1 <- sample(c("a","b","c"), N, replace=T)
cat2 <- sample(c("x","y","z"), N, replace=T)
val <- r
浏览 0提问于2009-10-29得票数 15
回答已采纳
2回答
如果符合条件的话，我试着画垂直线。
示例dataframe：
require(ggplot2)
require(dplyr)
example <- data.frame(
X = c (1:5),
Y = c(8,15,3,1,4),
indicator = c(1,0,1,0,0)
)
example %>% ggplot(aes(x=X,y=Y)) + geom_line() + geom_vline(xintercept=X)
在拦截中，当指示值为1时，X是X的值。因此，在这种情况下，我只想要在指示值为1时的垂直线。在本例中，这将在X=1和X=3上创建一条
浏览 0提问于2018-08-02得票数 4
回答已采纳
我正在使用ggplot2创建一些相当简单的散点图。我现在有两条简单的垂直线，使用：
... + geom_vline(xintercept=159684.186,linetype="dotted",size=0.6)+
geom_vline(xintercept=159683.438,linetype="dotted",size=0.6)+ ...
谁能告诉我如何从Y轴的顶部到X轴的这两条线之间的区域着色？
浏览 1提问于2012-02-07得票数 43
3回答
我正在尝试编写一个处理INI文件的小程序，以便在以后的项目中使用，首先是在加载到内存中后减小其大小。因此，
其中vLine是包含文件内容的向量
for (unsigned int i = 0; i < vLine.size(); i++)
{
if (!vLine[i].find(';', 0))
{
vLine[i].erase();
}
}
在打印vLine时，会留下以前以分号开头的行所在的空格，例如
1.
2. property
3. property
4.
5. property
使用resize()似乎是从列表中删除最后
浏览 0提问于2011-10-07得票数 14
回答已采纳
我正试图用ggplot2绘制一个直方图。
我用R写了一个简单的代码
dnorm.count <- function(x, mean = 0, sd = 1, log = FALSE, n = 1, binwidth = 1){
n * binwidth * dnorm(x = x, mean = mean, sd = sd, log = log)
}
mtcars %>%
ggplot(aes(x = mpg)) +
geom_histogram(bins =60,color = "white", fill = "#9FE367",
浏览 2提问于2018-06-14得票数 0
回答已采纳
因此，我从拍卖中获得了一个大型数据集(大约40万个观察值)。我正在尝试使用ggplot按天绘制拍卖价格，同时使用垂直线按颜色表示年份和月份。
我有一个保存日期的POSIXlt向量，下面是我正在使用的：
firstmonth<- c(1,32,60,91,121,152,182,213,244,274,305,335)
require(ggplot2)
p <- ggplot(bb, aes(saledate$yday, SalePrice))
p <- p + geom_point(aes(color = factor(saledate$year)), alpha = I(
浏览 5提问于2013-03-02得票数 1
回答已采纳
我想不出如何给每个vline加上year标签。有人能帮帮忙吗？下面是我的数据集和代码的示例。我想在平均长度vline上标记年份，并且/或者使用与图形图例中的年份相同的颜色代码。
Sector2 Family Year Length
BUN Acroporidae 2010 332.1300496
BUN Poritidae 2011 141.1467966
BUN Acroporidae 2012 127.479
BUN Acroporidae 2013 142.5940556
MUR Faviidae 2010 304.0405
MUR Fav
浏览 1提问于2014-08-17得票数 1
如果我尝试手动合成ggplot2图的一些元素，它可以很好地工作：
> p <- ggplot(aes(x = mpg, y = hp), data = mtcars)
> p + geom_vline(xintercept = 20) + geom_point(data = mtcars)
但是如果我试图将一些组合捆绑到一个函数中，我会得到一个错误：
> myFunction <- function() {
+ return(
+ geom_vline(xintercept = 20) + geom_point(data = mtcars)
+ )
浏览 0提问于2011-01-29得票数 25
回答已采纳
1回答
我是" R“的一个非常新的用户，我有一个问题。我目前正在制作R上的2D直方图。材料不一定重要，但我如何在2D直方图上绘制平均线。我正在运行的代码是：
load("mydatabin.RData")
# Color housekeeping
library(RColorBrewer)
rf <- colorRampPalette(rev(brewer.pal(11,'Spectral')))
r <- rf(32)
# Create normally distributed data for plotting
x <- mydata$A
浏览 0提问于2017-06-30得票数 1
我是R的新手，我有一个显示所有县的每个州的百分位数的图表，但是当我试图为每个地块添加一个平均值时，它是无效的：
library(ggplot2)
data(midwest)
percprof_mean <- sd(midwest$percprof)
ggplot(midwest, aes(x=percprof, y=..density..))
+ geom_histogram(binwidth = 0.5, color = "white") + facet_grid(state ~.)
+ stat_summary(fun.y=mean,geom="line&
浏览 0提问于2017-09-21得票数 1
回答已采纳
我试图将xvar中位数显示为虚线&在图例中显示它。这是我的密码：
require(ggplot2)
require(scales)
medians_mtcars <- data.frame("wt.median"=median(mtcars$wt))
# legend shows but linetype is wrong (solid)
p <- ggplot(mtcars, aes(wt, mpg))
p <- p + geom_point()
p <- p + geom_vline(aes(xintercept=wt.median, l
浏览 2提问于2014-09-14得票数 0
回答已采纳
我对ggplot2中的图例有个问题。绘图后，我的数据图例消失了。我绘制了三个统计数据: hist和两行。我试着把"fill“也用了"scale_fill_identity”和"scale_fill_manual“，但它仍然是隐藏的。
#set seed
seed=12345
#inputs
lambda = .2
n=40
sim = 1000
#simulation
sim1 <- NULL
for (i in 1:sim) sim1 = c(sim1, mean(rexp(n, lambda)))
library(ggplot2)
mydata &l
浏览 8提问于2018-02-16得票数 0
回答已采纳
1回答
我想在我的图上画几条垂直线，每条对应的vline都有一个图例。 在阅读了this post之后，我实现了以下内容： set.seed(99)
df.size <- 1e6
my.df <- data.frame(dist = rnorm(df.size, mean = 0, sd = 2))
library(ggplot2)
ggplot(my.df, aes(x=dist)) + geom_histogram(binwidth = 0.5)
vline1.threshold <- mean(my.df$dist)
vline2.threshold <- mean(
浏览 56提问于2019-02-27得票数 2
回答已采纳
2回答
我在更新ggplot对象时遇到了一些问题。我想要做的是将一条垂直线放在我在每个循环上更改的特定位置，因此:多条线将显示在不同的位置。然而，当我使用for循环时，它只显示它创建的最后一行，但是当我手动执行它时，它会工作。我创建了一个可复制的示例，你们可以检查：
library(ggplot2)
x <- ggplot(mapping = aes(x = 1:100, y = 1:100)) +
geom_line()
for(i in 1:6){
x <- x + geom_vline(aes(xintercept = i*5))
}
y <- ggplot(ma
浏览 4提问于2017-06-01得票数 3
回答已采纳
1回答
我正在尝试显示从"CSV“文件到Oracle窗体的数据。我使用Client_Text_IO程序从"CSV“文件中读取数据，并将逗号分隔为数据块。
我有一个列，其中一些数据为空，一些数据为空。如果我在excel中打开文件，那么：
第6号列某些行为空：
第6号列某些行具有数据：
当我在记事本中打开文件时，：
6,6,6000000116,HH00000471,Abdul akbar,,1610223056753
你可以看到"ABDUL AKBAR“后面有两个逗号，因为空数据
带有记事本中数据的：
6,6,6000000189,HH00000544,Rai
浏览 1提问于2019-05-14得票数 0
1回答
知道为什么当我试图在ggplot中的col4上只绘制一条垂直线时，其他列上有多行吗？
library(tidyr)
library(dplyr)
library(ggplot2)
Col0 <- c("AA", "BB", "CC", "DD","EE","FF")
Col1 <- c(2,2,2,6,1,1)
Col2 <- c(2,2,2,1,3,4)
Col3 <- c(2,2,3,4,6,6)
Col4 <- c(2,2,3,1,2,1)
Col5 <-
浏览 0提问于2018-10-15得票数 0
回答已采纳
1回答
我想为一系列的情节创造一个传奇。我只需要图例，而不需要实际的图形，因为我正在分别创建它们，并且已经有了正确的格式。然后我将加入这个普遍的传说。
目前，我有两条不同颜色线的代码分开，但理想情况下，我会有一条红色直线和一条红色虚线。然而，我不能使线冲向其中一个，并有两个红色。目前代码有一个是红色的，另一个是紫色的。都是直线。
看上去是这样的：
# libraries
library(readr) # for function file.path
library(dplyr)
library(ggplot2)
library(tidyverse)
library(cowplot)
libra
浏览 3提问于2022-05-12得票数 1
回答已采纳
我知道前面有一个同样的问题。
但是，这个问题涉及到一个比我这里的数据集更复杂的数据集，答案是重组数据，然后处理重组后的数据。但是这个问题仍然存在，即使像下面这样简单的数据，我也无法解决它。所以请不要把它标记为副本。
问题:当在scale_colour_manual中使用ggplot2时，图例没有显示。
p <- data.frame(a = runif(10, 1, 2))
ggplot(data=p, aes(x=a)) +
geom_histogram() +
geom_vline(aes(xintercept=mean(p$a), colour="mea")
浏览 5提问于2015-11-17得票数 7
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
