为geom_point和geom_line创建不同的配色方案: ggplot2
ggplot2是一个用于数据可视化的R语言包，它提供了丰富的图形语法和灵活的绘图功能。在ggplot2中，geom_point和geom_line是两个常用的几何对象，用于绘制散点图和折线图。
为了为geom_point和geom_line创建不同的配色方案，可以使用ggplot2提供的颜色函数和调色板。下面是一个完善且全面的答案：
- 概念：
- geom_point：用于绘制散点图，每个点代表一个数据观测值。
- geom_line：用于绘制折线图，通过连接数据点来展示数据的趋势。
- 分类：
- geom_point和geom_line属于ggplot2中的几何对象，用于数据可视化。
- 优势：
- geom_point和geom_line可以直观地展示数据的分布和趋势。
- ggplot2提供了丰富的图形语法和灵活的绘图功能，可以轻松定制图形的外观和样式。
- 应用场景：
- geom_point适用于展示离散数据的分布情况，比如散点图、气泡图等。
- geom_line适用于展示数据的趋势和变化情况，比如折线图、曲线图等。
- 推荐的腾讯云相关产品和产品介绍链接地址：
- 腾讯云提供了云计算服务，包括云服务器、云数据库、云存储等，可以满足各种计算和存储需求。具体产品介绍和链接地址请参考腾讯云官方网站。
总结：为geom_point和geom_line创建不同的配色方案可以通过ggplot2提供的颜色函数和调色板来实现。ggplot2是一个强大的数据可视化工具，可以帮助开发工程师在云计算领域中进行数据分析和可视化展示。
相关·内容
2回答
新的堆栈溢出。如果这事搞混了，我很抱歉。我要在这个问题上失去理智了。
我正在尝试创建一个grouping图，其中的线条是基于一个分组变量来着色的。一条线，但颜色不同。
当我在控制台中运行代码时，图形看起来和预期的一样。然而，当我运行这个闪亮的应用程序时，它似乎完全忽略了group=1参数，将组分成两行。
这里有一个reprex以供参考：
library(shiny)
library(ggplot2)
library(plotly)
library(tidyverse)
# Define UI
ui <- fluidPage(
# Application title
浏览 12提问于2022-03-29得票数 2
1回答
从csv文件开始，我在使用ggplot2库创建线条图时遇到了问题。 错误是"geom_path:每个组只包含一个观察值。您需要调整组美学吗？“ 我试着用变易函数在图上画一条线，但变量Date是字符，我需要它是数字的。 library(ggplot2)
library(dplyr)
dataset_room <- read.csv("dataset_room-temperature.csv")
ggplot (dataset_room, aes(x=Date, y=FrontLeft))+
geom_point()+
geom_line()
浏览 9提问于2021-04-29得票数 0
我有一个ggplot2线形图，有两条线，有很大的重叠。我正在尝试使用position_jitterdodge()，以便它们更明显，但我无法以相同的方式获取指向两个抖动的线条和点。我只想让点和线水平抖动(因为我不想建议在y轴上做任何改变)。以下是MWE：
## Create data frames
dimension <- factor(c("A", "B", "C", "D"))
df <- data.frame("dimension" = rep(dimension, 2),
浏览 1提问于2016-09-16得票数 18
回答已采纳
3回答
我想用ggplot2包创建一个图，它结合了线条和点。根据群组指示符，这些点应该有颜色和形状。应该创建一个图例，根据情节显示颜色和形状。
这部分运作得很好。但是，所有的点都应该有一个白色的填充，我找不到正确的代码。
谷歌搜索建议使用fill = "white"，但这是行不通的。
考虑以下示例数据和绘图：
library("ggplot2")
# Example data
df <- data.frame(y = 1:100,
x = 1:100,
group = as.factor(c(r
浏览 1提问于2019-01-07得票数 2
回答已采纳
1回答
我正在尝试使用ggplot2转换一个ggplotly()映像，但它没有正确地转换。我的ggplot映像一直都是两行代码，并有一个用于geom_line组件的颜色变量和一个用于geom_point组件的填充变量。
下面是我的代码，用于严格意义上的基本ggplot部分：
test_data1 = data.frame(
filter = "Filter 1",
time = seq(as.Date("2017-01-01"), as.Date("2017-03-01"), "days"),
ovr_perc = rnorm
浏览 1提问于2018-12-07得票数 3
回答已采纳
1回答
我想在ggplot2里做一个这样的情节
x <- 1:10
y <- rnorm(10) + x
df <- data.frame(x=x,y=y)
plot(x,y)
lines(x,y,type='c')
我喜欢这种type='c'风格，帮我告诉我
"c“表示由直线连接的空点
但是如何在ggplot2中实现这种类型呢？
library(ggplot2)
ggplot(data=df,aes(x=x,y=y)) + geom_line() + geom_point(shape=21,size=3)
我的意思
浏览 7提问于2017-05-23得票数 3
回答已采纳
2回答
我想要创建一个平面线图。在每个子图中，将一个y值(y1或y2)与基线进行比较.Y值和基线应该用不同的颜色来显示，但是这个配色方案应该在每个子图中保持一致。作为一个图例，我只需要两个条目：“y值”和“基线”，因为每个子图的标题都指定要比较的y值。
然而，我只得到了这个(示例代码)：
library(ggplot2)
library(reshape)
df = data.frame(c(10,20,40),c(0.1,0.2,0.3),c(0.1,0.4,0.5),c(0.05,0.1,0.2))
names(df)[1]="classes"
names(df)[2]="
浏览 0提问于2014-05-02得票数 2
回答已采纳
2回答
我正在尝试创建一个图表来显示ggplot2中的单个案例研究。已经创建了其他R包来处理这类数据，但我更愿意使用ggplot2。所以这是我的问题。
这是一个非常基本的图表，但我想分开线连接所有的点在两个部分，基于相位。所以前8个点应该用一条线连接，然后这条线应该停下来，然后从点9连接到最后一个点。在geom_vline中绘制垂直线时应使用相同的信息。
library(ggplot2)
Phase <- c("A", "A", "A", "A", "A", "A", "A", &#
浏览 1提问于2018-08-11得票数 0
回答已采纳
我无法用geom_line和geom_point绘制我的数据，所以gghighlight在不需要全局环境变量的情况下工作。
library(ggplot2)
library(gghighlight)
创建一些数据
x <- rep(1:5, 4)
y <- c(rep(1:5, 1) + rnorm(5)/5, rep(1:5, 1) + rnorm(5)/5 + 1, rep(6:10, 1) + rnorm(5)/5, rep(6:10, 1) + rnorm(5)/5 + 1)
treatment <- gl(2, 10, 20, labels=letters[1:2]
浏览 16提问于2022-04-03得票数 1
回答已采纳
我想创建一个垂直的Likert折线图，有没有用ggplot2或highcharter来绘制它的方法？ 以下是示例图表： ? 数据示例： value1 <- abs(rnorm(26))*2
data <- data.frame(
x=LETTERS[1:26],
value1=value1,
value2=value1+1+rnorm(26, sd=1)
)
浏览 12提问于2021-04-13得票数 0
回答已采纳
我正在尝试用我自己的数据集重新创建附加的图形。附加的R脚本是90%在那里，但我似乎找不到一种方法，风格的线条根据数字。具体来说，我需要以实心开始，以点结尾并以虚线形式继续的线条特性。我更喜欢在R中使用ggplot2。
如何使我的图形中的每一行都是坚实的，直到x = 5 以一个点结尾，最后以虚线的形式继续？
# Sample Dataset
Samples = c(1,2,3,4,5,6,7,8,9,10)
SestYB = c(2.1,3.89,5.42,6.73,7.87,8.86,9.75,10.56,11.3,12)
CILowYB = c(1.03,2.01,2.92,3.7
浏览 1提问于2013-05-28得票数 4
回答已采纳
在查看使用ggplot2制作基本绘图的示例时，我注意到一些示例在原始ggplot()函数中为它们的x和y轴提供了美学映射。另一方面，其他示例只在ggplot()调用中提供ggplot()，并在它们使用的任何geom_参数中提供x和y的美学映射。这两个例子产生了相同的情节。有什么重要的功能差异吗？这是优先考虑的问题，还是每个人都有合适的时间？
data(mpg)
ggplot(mpg, aes(x=displ, y=hwy))+
geom_point()
ggplot(mpg)+
geom_point(aes(x=displ, y=hwy))
浏览 4提问于2020-02-04得票数 1
回答已采纳
我使用scale_colour_manual来指定我需要的可能的颜色。然而，如果我选择red，我得到的是令人眼花缭乱的红色，而不是如果我一开始没有使用scale_colour_manual时出现的较温和的ggplot2默认红色。用于访问ggplot2默认调色板的标签或常量是什么？
ggplot(data=df, aes(x=n, y=rt, group=kernel, shape=kernel, colour=kernel)) +
geom_point(fill="white", size=3) + geom_line() + xlab("n")
浏览 2提问于2012-09-08得票数 3
回答已采纳
1回答
所以，正如在问题中所说的，我想连接ggplot2图中的点。这些点应该按照绘制到图形的顺序一个接一个地连接，如下所示：
抱歉画得太差了。
basepop <- matrix(c(10,30),nrow = 2)
matrixA <- matrix(c(0.4,-0.325,0.3,1.2),nrow = 2)
matrixA
z <- eigen(matrixA)
z$val
eigenmatrix <- z$vec
eigenmatrix
eigeninverse <- solve(eigenmatrix)
constmatrix <- eigenin
浏览 2提问于2020-12-30得票数 0
回答已采纳
1回答
我有几个关于使用ggplot2作图的问题。我已经使用下面的命令对数据点使用R.
library(ggplot2)
df <- read.csv(file="c:\\query2.csv")
ggplot( df,aes( x = Time,y ,y = users,colour = users>40) ) + geom_point()
我的问题是:如何绘制连接数据点的连续线，以及如何在users >40的数据点周围圈。
浏览 4提问于2016-07-15得票数 1
回答已采纳
1回答
我试图创建一个散点图，然后在散点图中添加点之间的线。我可以使用plot和segments使其工作，如下所示：
set.seed(10)
xvar = runif(10, 0, 1)
yvar = runif(10, 0, 1)
start = c(1, 1, 1, 9)
end = c(2, 4, 6, 10)
plot(xvar, yvar)
segments(xvar[start], yvar[start], xvar[end],yvar[end], col= 'blue')
我想实现相同类型的想法，但使用ggplot2。我对此的推理是，我可能希望在情节中添加美学，而g
浏览 2提问于2016-01-26得票数 1
回答已采纳
2回答
对于示例数据帧：
df <-structure(list(Type = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L,
1L, 2L, 2L, 3L, 3L, 3L, 3L), .Label = c("A", "B", "C"), class = "factor"),
RSL = c(-1.84, 7.68, 18.4, 13, 39.8, 98.4, 129.9, 94.9, 138,
142, 10, 50, 60, 80), Age = c(1181.5, 4633
浏览 0提问于2017-09-22得票数 1
这似乎与哈德利在他的ggplot2书中的一些例子类似，但我似乎不能使其工作。给定：
off = c(0, 2000, 4000, 6000, 25, 3000, 6050, 9000)
tim = c( 0, -100, -200, -300 -25, -125, -225, -325)
col = c( 1, 1, 1, 1, 2, 2, 2, 2)
dataf = data.frame(off, tim, col)
p = ggplot(dataf, aes(off, tim, color=col)) + geom_point() + geom_line()
p
我认为这应该绘制这八个点，
浏览 2提问于2011-03-05得票数 5
回答已采纳
1回答
下面我有一个shiny应用程序，在这个应用程序中，我会根据Metric的选择显示一个线条图。问题是，图例并不是每次都会显示，当我做出2种选择时，颜色也会丢失。
## app.R ##
library(shiny)
library(shinydashboard)
library(plotly)
BRAND<-c("CHOKIS","CHOKIS","CHOKIS","CHOKIS","CHOKIS","CHOKIS","LARA CHOCO CHIPS","LARA CH
浏览 10提问于2022-05-17得票数 0
回答已采纳
2回答
我创建了一个带有x和y值的虚拟数据。x是0和2*pi之间的任意值。y是sin(x) +- noise。noise是介于0和0.5之间的随机值。
我已经使用这个公式创建了一个线性回归曲线：fit <- lm(ys ~ xs + I(xs^2) + I(xs^3))。我可以用下面的代码来绘制原始的正弦函数和点：
plot(sin, 0, 2*pi,col="green",xlim = c(-0.5, 6.5), ylim = c(-1.5, 1.5))
points(xs, ys,col="blue")
我还想将拟合的曲线添加到相同的图中。我做了一些研究，并提
浏览 0提问于2020-08-06得票数 0
我正在使用ggplot2进行绘图，其中我将数据放在存储箱中，但我在图形方面遇到了一些问题。 问题是这样的:我想在x轴的底部添加刻度标记，因为我现在的轴是对数刻度的。我在生成绘图方面没有问题，但是一旦我向它添加了刻度线，我还会在左上角看到这个粗大的黑条 ? 。 我感觉绘图的问题与annotation_logticks()有关，因为当我删除那段代码时，粗条就消失了 ? 。我尝试更改scale_x_log10()的限制以避开条形图，但这没有任何作用 有什么建议可以在避开横条的同时显示x轴上的刻度标记吗？ 下面是我用来生成绘图和一些虚拟数据的代码(抱歉，它太长了！) 我不确定这是否有用，但我使用的是
浏览 14提问于2020-01-31得票数 1
回答已采纳
这是我的R剧本：
#!/usr/bin/env Rscript
library (ggplot2)
data = read.table ("downloads.txt", header=T)
data$number = factor (data$Size)
data$PITtype = factor (data$PITtype)
g.all <- ggplot (data, aes (x=Time, y=number, color=PITtype)) +
geom_point (size=2) +
geom_line () +
ylab ("#
浏览 3提问于2014-01-17得票数 0
回答已采纳
我想要更改两条线上的点的形状和大小，我可以这样做，但出现了第二个图例。
当你运行这段代码时，你会看到2个图例。我只想要“变量”的图例。
library("ggplot2")
MyData<-data.frame(time= c(1,2,3,1,2,3), value = c(.4,.6,.7,.1,.2,.3), variable = c("company a","company a","company a","company b","company b","compa
浏览 0提问于2014-04-11得票数 1
我有一个函数来打印和保存一些图表使用ggplot2。当我执行到geom_density时，出现了错误消息。
Don't know how to automatically pick scale for object of type function. Defaulting to continuous
Error in data.frame(x = 1:5, y = c(44.43, 72.36, 177.17, 515.09, 1403.33 :
arguments imply differing number of rows: 5, 0
经过一些研究，我发现我可能错过了小组的名称和
浏览 1提问于2013-08-30得票数 0
回答已采纳
3回答
在ggplot2中，我正在尝试一个简单的东西，但由于某些原因，我无法获得它。我已经调整了数据框中的均值和SE，并想绘制均值、误差条，然后将均值与点连接起来。以下是代码和错误(它可以执行除与geom_line连接之外的所有操作(使用
library(ggplot2)
#data set
data1 <- structure(list(group = structure(1:3, .Label = c("1", "2", "3"
), class = "factor"), estimate = c(55.746665412276
浏览 0提问于2012-09-20得票数 2
回答已采纳
1回答
在ggplot2中，我想做一个简单的geom_point()散点图，用一条线将点连接起来。但是，我希望这些行不会触及要点，例如在中，但在ggplot2中我似乎根本不能管理。
浏览 2提问于2014-06-25得票数 1
2回答
我正在用R中的ggplot2创建一个图，与往常一样，0.0原点在左下角，但是，我想把它移到左上角的和，反转点的顺序。
我试着用下面的图片来解释我的意图。我要将0.0原点移到红色的0.0原点。当然，还必须颠倒y轴点的内容。
为了创建这个情节，我使用：
P = ggplot(plot_data_frame, aes(x=Index, y=dataVector)) + geom_point() + geom_line()
我怎么能这么做？谢谢!
浏览 2提问于2016-05-01得票数 1
回答已采纳
我有以下数据和简单的代码
library(ggplot2)
dane <- data.frame(mylevels=c(1,2,5,9), myvalues=c(2, 5, 3, 4))
ggplot(dane, aes(x=factor(mylevels), y=myvalues)) + geom_line() + geom_point(size=3)
我不知道如何强制"ggplot2“划线--我得到了一个错误。在PP.55 (R Graphics Cookbook)上，Winston Chang描述了同样的错误，但我的图更简单，这就是为什么他的解决方案不能被采用。
浏览 2提问于2013-04-13得票数 10
回答已采纳
我正在尝试使用同时包含geom_smooth和geom_point的ggplot2创建绘图。因为我想查看这条线的斜率以及它是如何随时间变化的，所以我希望将geom_smooth线设置为一种颜色(时间点)，而将这些点设置为不同的颜色(通过绘图)。我尝试过各种不同的方法，但都失败了。包括我在stackoverflow上找到的一些选项。 我的代码如下： ##Edited code to show as of 7/28
ggplot(data, aes(x = InitialAshDepth, y = S.obs, color =TimePoint)) +
geom_point(size = 3.5
浏览 29提问于2020-07-28得票数 0
我是ggplot2的重度用户，但不知何故，我正在努力解决这个问题。
例如，我有一个来自ggplot2的图，如下所示
这里我想删除x轴标签，并在0和100处分别添加"start“和"end”。我在这里看到了一些关于如何向ggplot2添加自定义标签的帖子，但它并没有帮助我解决我的问题。我在想，不知何故这一切都有可能。
非常感谢。
浏览 3提问于2018-09-01得票数 1
回答已采纳
1回答
不使用子集的ggplot
、、、、
我使用ggplot2和faceting选项来绘制data.frame的几个结果。
它是一个包含三个因素的data.frame：
6 levels;condition (C)与6 levels;stimuli (S)，10条件下的参与者(N)。
我用子集函数在一个条件下绘制一个参与者的结果，然后我用ggplot来划分结果。但是，我想知道在ggplot2中是否有更简单的解决方案？
谢谢你的帮助，我现在正在学习R和ggplot2。
浏览 2提问于2011-10-07得票数 2
回答已采纳
1回答
我创建了一个基于组的图表，然后改变子组中点的颜色。
我该怎么给这些线贴上标签呢？
我已经创建了一些示例数据和代码。我有更多的数据点和更多的行。
线路以日为基础，分组以燃料为基础。就像你在传说中看到的。我只能分辨哪一条是燃料，而不是哪条线是第一天还是第二天。
Price <- seq(1, 20, by=1)
MW <- seq(1, 200, by=10)
fuel <- rep(c("Coal", "Gas", "Hydro", "Other"), each=5)
Day <- rep(1, each=2
浏览 1提问于2014-04-02得票数 1
我尝试了基于这里的几个帖子的几个建议，以及阅读ggplot2文档，但是这个问题略有不同，而且我还没有找到解决方案。
下面是一段代码片段，用于创建一个与我正在使用的数据文件类似的融化数据文件：
a <- c(1,2,3,4,5,6,1,2,3,4,5,6)
b <- c("loss", "draw", "win", "draw", "loss", "win", "loss", "draw", "win", "draw", &#
浏览 2提问于2016-05-04得票数 5
回答已采纳
我想用正值和负值绘制不同颜色的折线图。不幸的是，这个计划不知何故有问题。0旁边的几个值以错误的颜色显示。 ? 代码： set.seed(345); df2 <- data.frame(date=1:100, y=cumsum(runif(100)-0.5))
d <- ggplot2::ggplot( df2, ggplot2::aes(date, y) ) +
ggplot2::geom_line( ggplot2::aes( group = 1, color= (y < 0)));d 你知道为什么绘图不起作用吗？
浏览 22提问于2019-05-03得票数 0
2回答
连接点
、
我有以下图
require(ggplot2)
dtf <- structure(list(Variance = c(5.213, 1.377, 0.858, 0.613, 0.412, 0.229, 0.139, 0.094, 0.064), Component = structure(1:9, .Label = c("PC1", "PC2", "PC3", "PC4", "PC5", "PC6", "PC7", "PC8", "PC9"),
浏览 1提问于2013-02-24得票数 8
回答已采纳
3回答
我正在学习如何使用ggplot2，并正在寻找最小的ggplot2代码来再现下面的base::plot结果。我尝试了一些事情，它们最后都是可怕的长，所以我正在寻找最小的表达式，理想情况下希望在x轴上有日期(在下面的plot中不存在)。
df = data.frame(date = c(20121201, 20121220, 20130101, 20130115, 20130201),
val = c(10, 5, 8, 20, 4))
plot(cumsum(rowsum(df$val, df$date)), type = "l")
浏览 6提问于2013-04-05得票数 17
回答已采纳
我正在运行一个线性模型，我想创建一个框架，以一种快速、可重复的方式使用ggplot2来可视化我的actual和fitted的值，这样当我运行一个模型时，我可以快速地拉出最新的运行，并看到我在哪里有最大的残差。 我已经创建了一个样例数据集来运行它，但是当将拟合值添加到可视化中时，最终会遇到错误(actual值本身就很简单)。参见下面的示例代码： # creating sample data set
dfmodel<- data_frame(seq(as.Date('2018-01-01'), as.Date('2018-01-10'), by= '
浏览 36提问于2018-12-22得票数 1
回答已采纳
我的目标是绘制一条河流的路径，用点来指示河流附近的重要地点。
我有两个数据框，分别给出了河流和场地坐标：
river<-data.frame(
long=c(-2.816452494909265,-2.845487331898639,-2.883036393822358),
lat=c(56.38229290416972,56.36346886284386,56.36577994637793))
samploc<-data.frame(
site=c("Site1","Site2","Site3"),
浏览 0提问于2011-09-22得票数 10
回答已采纳
1回答
我使用这段代码来绘制我的数据。statistics变量包含两个值：“平均值”和"sd“。
ggplot(NDVIdf_forplot, aes(x = statistic, y= value, group = ID)) + geom_line()
如果我使用该代码，则图表中同时包含了“平均值”和"sd“两个类别。我只想使用统计变量的“平均”类中的那些观察，然后使用"sd“类来绘制geom_errorbar。
我以前使用过此代码，但没有创建我想要的：
ggplot(NDVIdf_forplot,aes(x=mean,y=value))+geom_errorbar(aes(
浏览 1提问于2017-10-30得票数 0
回答已采纳
我在ggplot2中找不到一个常见的、琐碎的统计问题的明显解决方案。我希望geom_smooth(method = "lm")在color美学中保持组间的斜率常数。
我开始使用的天真模型是lm(Sepal.Width ~ Sepal.Length, data = iris)。在ggplot2中绘制此图
library(ggplot2)
ggplot(iris, aes(x = Sepal.Length, y = Sepal.Width) +
geom_point() +
geom_smooth(method = "lm")
为了为Species
浏览 1提问于2022-04-06得票数 0
这是我的数据框： df<-structure(list(category_of_job = structure(1:27, .Label = c("Recepcionist",
"Secretaries", "Admin", "Stock control", "Government admin",
"Payroll & accounts", "Human resources", "Research admin", "Accounts"
浏览 14提问于2021-07-31得票数 3
回答已采纳
1回答
我正在用geom_line，geom_point和geom_smooth在ggplot2中绘制一条趋势线的线状图。我的代码与此类似。 year <- as.character(2011:2020)
x <- c(12, 13, 12.5, 14, 15, 17, 16, 18, 18, 19)
y <- c(25, 28, 30, 27, 30, 31, 30, 31, 33, 33)
dat <- data.frame(year, x, y) %>%
pivot_longer(cols = c(x,y), names_to = "item
浏览 22提问于2020-03-21得票数 2
回答已采纳
我在ggplot2中绘制两条线有问题，因为我需要它们更接近，以改善比较。我尝试使用'log‘和'sqrt’来更改y标度，但这两行仍然相距很远。 我的数据很大，我不能在这里上传，但这是我的代码 ggplot(data_sex, aes(x = year, y = sqrt(log(ratemort)), color = sex)) +
geom_line(aes(group = sex)) +
coord_cartesian( ylim = c(3.25,3.67))+
geom_point() ? 其中年份“性”是一个因素，“率”是一个数字。 我希望近似线
浏览 12提问于2019-10-08得票数 0
回答已采纳
如果我有data.frame df
library(lubridate)
library(ggplot2)
library(dplyr)
day.start = today()
df = data.frame(date = seq.Date(from = today() - days(10), to = today() + days(10), 'day'))
df$day.idx = as.numeric(df$date - day.start + 1)
df$day.idx = ifelse(df$day.idx < 1, df$day.idx + nrow(df)
浏览 1提问于2019-07-01得票数 2
回答已采纳
让ggplot2按我的意愿工作，我遇到了一点小麻烦。基本上，我想比较一下实际的观察和近似的结果，把它们放在一个单独的地方。例如,
> library(ggplot2)
> df.actual <- data.frame(x = 1:100, y = (1:100) * 2)
> df.approx <- data.frame(x = 1:150, y = (1:150) * 2 + 5 + rnorm(150, mean = 3) )
> ggplot() + geom_point(aes(x, y), data = df.actual) + geom_l
浏览 2提问于2009-11-24得票数 8
回答已采纳
我已经用ggplot制作了下面的图。我想减少y轴和第一类(a)之间的距离。我应该使用哪个函数？谢谢！:) library(ggplot2)
library(reshape2)
data <- data.frame(a = rnorm(10), b = rnorm(10), c = rnorm(10), group = 1:10)
data <- melt(data, id = "group")
ggplot(data, aes(x = variable, y = value, group = group, color = as.factor(group)))
浏览 55提问于2019-10-18得票数 2
回答已采纳
我正在尝试写一个代码，我写的基本图形包在R到ggplot。
我使用基本图形包得到的图形如下：
我想知道是否可以在ggplot2中创建这种类型的图形。我认为我们可以使用面板来创建这种图形，但我想知道是否可以使用刻面来绘制这种图形。我遇到的主要困难是最大值和最小值具有相同的长度，而观察到的数据不是连续数据，并且间隔非常不同。
任何关于为这种类型的绘图安排数据的想法都会非常有帮助。非常感谢。
浏览 0提问于2013-01-23得票数 1
回答已采纳
1回答
我想用ggplot2创建一个黑白图，其中数据是用线条和点的组合按类别绘制的。然而，图例只显示点形状，没有任何线贯穿它，除非我添加颜色的情节。
下面是一些示例数据来说明以下问题：
## Create example data
set.seed(123)
dat <- data.frame(
time_period = rep(1:4, each = 3),
category = rep(LETTERS[1:3], 4),
y = rnorm(12)
)
这里是一个颜色图的例子，所以您可以看到我想让这个传说看起来怎样：
library(ggplot2)
## Gene
浏览 5提问于2020-08-31得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
