ggplot2中每个组的不同scale_fill_gradient
ggplot2是一个用于数据可视化的R语言包，它提供了丰富的图形语法和灵活的绘图功能。在ggplot2中，scale_fill_gradient函数用于调整图形中填充颜色的渐变效果。
每个组的不同scale_fill_gradient是指在图形中的不同组之间，使用不同的填充颜色渐变效果来区分它们。这在数据可视化中非常有用，可以帮助我们更好地理解和比较不同组之间的差异。
在ggplot2中，我们可以使用scale_fill_gradient函数来设置每个组的不同填充颜色渐变效果。该函数有几个参数可以调整，包括low、high、limits、breaks、labels等。
- low和high参数用于设置渐变的起始颜色和结束颜色。可以使用颜色名称或十六进制颜色码来指定。
- limits参数用于设置填充颜色的取值范围。可以指定一个数值向量，表示最小值和最大值。
- breaks参数用于设置填充颜色的分割点。可以指定一个数值向量，表示分割点的位置。
- labels参数用于设置填充颜色的标签。可以指定一个字符向量，表示每个分割点的标签。
以下是一个示例代码，演示了如何使用scale_fill_gradient函数设置每个组的不同填充颜色渐变效果：
library(ggplot2)
# 创建一个示例数据集
data <- data.frame(
group = rep(c("A", "B", "C"), each = 10),
x = rnorm(30),
y = rnorm(30)
)
# 绘制散点图，并设置每个组的不同填充颜色渐变效果
ggplot(data, aes(x, y, fill = group)) +
geom_point() +
scale_fill_gradient(low = "blue", high = "red")在这个例子中，我们创建了一个包含三个组的示例数据集。然后使用ggplot函数创建一个散点图，并通过aes函数将组变量映射到填充颜色。最后使用scale_fill_gradient函数设置每个组的不同填充颜色渐变效果，起始颜色为蓝色，结束颜色为红色。
推荐的腾讯云相关产品和产品介绍链接地址：
- 腾讯云云服务器（CVM）：https://cloud.tencent.com/product/cvm
- 腾讯云云数据库MySQL版：https://cloud.tencent.com/product/cdb_mysql
- 腾讯云人工智能平台（AI Lab）：https://cloud.tencent.com/product/ailab
- 腾讯云物联网平台（IoT Hub）：https://cloud.tencent.com/product/iothub
- 腾讯云移动应用开发平台（MPS）：https://cloud.tencent.com/product/mps
- 腾讯云对象存储（COS）：https://cloud.tencent.com/product/cos
- 腾讯云区块链服务（BCS）：https://cloud.tencent.com/product/bcs
- 腾讯云元宇宙服务（Tencent XR）：https://cloud.tencent.com/product/xr
相关·内容
我想绘制每月的本地建设地图，特别是使用stat_density2d从ggplot2。我使用以下代码：
library(ggmap)
options(stringsAsFactors=T)
mar_2016 <- structure(list(Latitude = c(47.6064785, 47.6086266, 47.61556306,
47.5335102, 47.53424442, 47.62629031, 47.66231885, 47.55882248,
浏览 4提问于2016-05-04得票数 3
回答已采纳
1回答
用自定义梯度填充直方图框
、、、
我想在R和ggplot2中创建一个直方图，其中回收箱是根据它们的连续x值填充的。大多数教程只使用离散值或密度/计数来着色。
接下来，能够用彩虹的比例给垃圾箱涂上颜色：
df <- data.frame(x = runif(100))
ggplot(df) +
geom_histogram(aes(x), fill = rainbow(30))
我想使用一个颜色梯度，其中回收箱是从蓝色(最低)到黄色(最高)。scale_fill_gradient()函数似乎实现了这一点，但是当我为fill参数插入它而不是rainbow()时，我会收到一个错误：
> ggplot(df) +
浏览 0提问于2018-05-03得票数 2
回答已采纳
是否有办法在ggplot2 2d bin函数(如geom_hexbin() )中手动设置z限制？
例如；
library(ggplot2)
dat <- data.frame(
x = rnorm(1000),
y = rnorm(1000)
)
ggplot(dat, aes(x, y)) +
geom_hex()
有办法手动设置z限制吗？预期的效果是手动控制颜色刻度开始和结束的点。
谢谢!
为了获得额外的分数，我也想改变颜色刻度的颜色。
浏览 1提问于2015-11-05得票数 1
回答已采纳
3回答
具有多行在同一图上有独立图例的
、、、、
我试图用ggplot2制作一个热图，其中包含3种类型的变量，每个变量都需要各自独立的图例/比例。
我能够把它们全部绘制成一个热图(下图)，但我很难将它们分开，以获得它们自己的传奇。我的三个类别是行“得分”、"samp1“和其余的数据。我希望每一个人都有自己独立的传说和各自的范围。
我唯一的补充将是有一个绿色，黄色，红色(低，中，高)颜色方案，如果这是可以包括在这个问题的行得分。
这是我用来创建图形的代码。
library(ggplot2)
test_data <- read.csv("test_table.csv", row.names = 1)
gg
浏览 3提问于2020-08-19得票数 7
回答已采纳
1回答
函数geom_tile和scale_fill_gradient生成很好的热图。如何将标签添加到ggplot2瓷砖中，以便每个瓷砖都有其各自的值？
PS:有许多软件包做热图，成功程度极高(例如，这里有一项调查：)。但如果可能的话，我对ggplot2解决方案感兴趣。
一个小代码示例(没有标签)：
library(Hmisc)
library(ggplot2)
df <- data.frame(row=sample(c("A", "B"), 10, replace=T),
col=sample(c("x", &#
浏览 2提问于2013-12-11得票数 12
回答已采纳
我有一个带有梯度的热图，我想用特定的百分比来标记这个图例。
# example data, apologies for the kludginess
library('ggplot2'); library('scales'); require('dplyr');
as.data.frame(with(mtcars, table(gear, cyl))) %>%
group_by(cyl) %>%
mutate(pct_of_cyl_class = Freq / sum(Freq)) %>%
ggplot(. ,a
浏览 2提问于2015-11-04得票数 6
回答已采纳
我正试图用ggplot2和scale_colour_gradient绘制一个Pearson成对相关图。
以下是我的示例数据：
library(dplyr)
library(ggplot2)
set.seed(1)
pairs.mat <- t(combn(1:5,2))
df <- data.frame(sample1=pairs.mat[,1],sample2=pairs.mat[,2]) %>% dplyr::mutate(association=runif(10,0.85,1))
下面是我正在尝试的ggplot2代码：
heatmap.ggplot <- ggp
浏览 0提问于2018-07-18得票数 0
回答已采纳
我想把这个代码变成： 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
回答已采纳
我在学习R和ggplot2。我可以绘制单变量函数(使用geom_path)和密度映射(使用geom_raster)。然而，我无法找到一种方法将它们结合起来，生成如下所示的图形。这在ggplot2中是可能的吗？
浏览 5提问于2017-04-21得票数 0
回答已采纳
我正在尝试创建一个类似于问答的情节：()。
将上述链接上的问题和接受答案中的代码组合在一起，将创建以下MWE：
require(ggplot2)
n <- 1e5
df <- data.frame(x = rexp(n), y = rexp(n))
p <- ggplot(df, aes(x = x, y = y)) + stat_binhex()
my_breaks = c(2, 10, 50, 100, 200, 6000)
p + scale_fill_gradient(name = "count", trans = "log", br
浏览 3提问于2017-07-01得票数 1
回答已采纳
我使用R (3.0.1)和ggplot2 (ggplot2_0.9.3.1)与geom_tile和scale_fill_gradient。我在scale_fill_gradient中使用‘scale_fill_gradient’选项，如下所示。问题是，我想摆脱灰色背景，出现在指定的界限之外。我希望背景是白色的，就像图形的其他部分一样，因为theme_bw()。我一直想不出该怎么做。谢谢。
pp <- function (n,r=4) {
x <- seq(-r*pi, r*pi, len=n)
df <- expand.grid(x=x, y=x)
df$r <
浏览 1提问于2013-09-08得票数 4
回答已采纳
2回答
假设我有这样的数据：
d1 <- data.frame(x = letters[1:3], y=LETTERS[24:26], num = 1:3)
d2 <- data.frame(x = letters[1:3], y=LETTERS[24:26], num = c(1,2,30))
library(gridExtra)
library(ggplot2)
ggd1 <- ggplot(d1, aes(x=x,y=y)) +
geom_tile(aes(fill=num)) +
scale_fill_gradient(low
浏览 4提问于2014-02-25得票数 2
回答已采纳
1回答
可能重复：
我正在创建一个ggplot2热图图。我的数据如下：
df
Date Value Desc
1/1/2012 40 Brasil
1/1/2012 90 Argentina
1/1/2012 10 England
1/1/2012 5 China
2/1/2012 40 Brasil
2/1/2012 90 Argentina
2/1/2012 10 England
2/1/2012 24 China
3/1/2012 40 Brasil
浏览 4提问于2012-08-28得票数 3
回答已采纳
在这个question的基础上，我尝试绘制多年的彩色编码地图。考虑下面的最小示例： library(ggplot2)
states <- map_data("state")
var <- data.frame(table(states$region))
var$x1 = runif(49, 5.0, 7.5)
var$x2 = 2+runif(49, 5.0, 7.5)
states$x1 <- var$x1[match(states$region,var$Var1)]
states$x2 <- var$x2[match(states$region,v
浏览 15提问于2019-06-11得票数 3
它是否有可能使它显示在组内密度而不是计数？
library(ggplot2);data(diamonds)
ggplot(diamonds, aes(carat, depth)) +
stat_bin2d(bins=40)+ facet_wrap(~color)
这将使比较组之间的模式变得更容易，因为某些组可能会更多地出现。
这个问题有点类似于：，它也缺乏答案。
浏览 2提问于2016-06-16得票数 2
回答已采纳
1回答
我正试图用R.中的ggplot2制作一张世界地图，它应该是一个基于国家的热图。我正在处理的数据来自twitter，我想显示这些推特来自哪里。有两个问题：
综合数据
Map_data(“世界”)
给我一张20年前的地图(苏联)。
map_data("world2")
好像被损坏了。或者有一些订购问题，但我不知道如何解决。
我想要改变颜色，不知道如何访问它。由于巴西是唯一一个易于阅读的国家，因此，重要的是编辑断点，并显示不到1000条推特的国家之间的差异。
这是我的密码
WD <- getwd()
if (!is.null(WD))
浏览 2提问于2012-09-03得票数 1
回答已采纳
我正在尝试使用ggplot2中的geom_map来生成一个choropleth地图。我想用黑色或其他颜色勾勒出不同的区域，以区分渐变上颜色相似的区域。使用下面的代码，我尝试设置颜色来勾勒出区域。代码生成地图，但没有边界。当我将颜色命令移动到美学中时，它会产生预期的带有图例的“粉红色”边框。你知道为什么设置颜色不会产生边框，但是映射会产生边框吗？我在ggplot2谷歌小组上看到了类似的讨论。
ggplot(subset(df, as.character(variable) == "value"), aes(map_id = id)) +
geom_map(aes(fill =
浏览 1提问于2012-04-25得票数 2
回答已采纳
使用ggplot2，我想将一个annotate()形状添加到基于日期规范的时间序列图中，然后从左到右从"gray90“到"gray50”渐变填充该形状。下面是一个最小工作示例： library(ggplot2)
set.seed(813)
min_date = as.Date("2020-05-01")
max_date = as.Date("2020-07-14")
dates = seq(min_date, max_date, by = "day")
shaded_start = max_date - 21
df <
浏览 46提问于2020-07-15得票数 0
回答已采纳
有人知道如何使用ggplot2将R中具有连续值的数据帧转换成漂亮的图形吗？这与的答案类似，但适用于ggplot2。
这个是可能的吗？
新的R和ggplot2，所以感谢提前收到任何建议。
浏览 0提问于2018-05-01得票数 1
回答已采纳
1回答
我正试图将来自ggplot2的钻石数据可视化在一个直方图中，其中我显示了克拉的分布。
我尝试过将aes值从ggplot移动到geom_histogram()，尝试..fill.，并以不同的方式操作代码，但结果是一样的。
histogram<- ggplot(diamonds, aes(x=carat, fill=carat)) +
geom_histogram(binwidth = 0.1) + scale_fill_gradient(low='blue', high='yellow')
我希望看到我的直方图从蓝色到黄色，随着克拉数的增加，但我仍然看到
浏览 0提问于2019-03-31得票数 2
回答已采纳
1回答
geom_histogram颜色
、、、、
我有一个数据集，我想用geom_histogram (下面的数据)绘制ggplot。我想要得到一个渐变的配色方案，我有问题。
structure(list(UserID = c(39120L, 39536L, 39550L, 39627L, 39632L,
39709L, 39971L, 39988L, 39990L, 40062L, 40065L, 40065L, 40066L,
40142L, 40142L, 40143L, 40161L, 40193L, 40364L, 40437L, 40439L,
40440L, 40451L, 40453L, 40665L, 40665L,
浏览 1提问于2013-07-18得票数 1
回答已采纳
1回答
我有一个输入文件file1.txt
rs113565588 SIFT 0.306
rs113565588 Polyphen2 0
rs113565588 MutationAssessor 0.345
rs61729896 SIFT NA
rs61729896 Polyphen2 NA
rs61729896 MutationAssessor NA
rs61755283 SIFT NA
rs61755283 Polyphen2 NA
rs61755283 MutationAssessor NA
rs777439738 SIFT NA
浏览 0提问于2018-08-18得票数 0
回答已采纳
这应该很容易，但我找不到路。
tri_fill <- structure(
list(x= c(0.75, 0.75, 2.25, 3.25),
y = c(40, 43, 43, 40)),
.Names = c("x", "y"),
row.names = c(NA, -4L), class = "data.frame",Integrated=NA, Related=NA)
# install.packages("ggplot2", dependencies = TRUE)
require
浏览 6提问于2015-11-27得票数 9
回答已采纳
我找不到如何为传递给geom_bin2d的两个不同的数据集适当地指定两个色阶。
下面的代码不起作用，第一个"scale_fill_gradient“调用被忽略，只有最后一个调用(白色到蓝色)在抛出以下错误消息后使用：
“填充”的比例已经存在。为“填充”添加另一个刻度，这将取代现有的刻度。
下面是要使用的最低限度代码：
require(ggplot2)
dfA <- data.frame(x=rnorm(50000, mean=5), y=rnorm(50000, mean=5))
dfB <- data.frame(x=rnorm(30000, mean=25),
浏览 0提问于2018-10-17得票数 1
回答已采纳
2回答
交互相关矩阵
、、
我想在ggplot2或plot_ly中绘制相关矩阵，它应该是交互式的，并同时显示相关值和相应的p值。
我已经尝试了以下代码。
library(ggplot2)
library(plotly)
library(reshape)
library(Hmisc)
x <- Seatbelts
y <- as.matrix(x)
rt <- rcorr(y)
mtlr <- melt(rt$r)
mtlp <- melt(rt$P)
gx <- ggplot(mtl, aes(X1,
浏览 41提问于2017-03-10得票数 1
回答已采纳
我正在尝试重新创建“R图形烹饪本”第87页中的一个示例图。
我试图用以下代码重新创建，但没有得到结果：
library(ggplot2)
library(hexbin)
sp <- ggplot(diamonds, aes(x=carat, y=price))
sp + stat_binhex() +
scale_fill_gradient(low="lightblue", high="red",
breaks=c(0, 250, 500, 1000, 2000, 4000, 6000),
浏览 0提问于2018-06-06得票数 5
回答已采纳
2回答
我不知道如何使用ggplot使直方图的条形图按降序显示。
下面是我的代码，其中包含一个每个人都可以使用的数据帧：
library(ggplot2)
library(scales)
chol <- read.table(url("http://assets.datacamp.com/blog_assets/chol.txt"),
header = TRUE)
ggplot(chol) +
geom_histogram(aes(x = AGE, y = ..ncount.., fill = ..ncount..),
breaks=seq(2
浏览 1提问于2017-04-05得票数 2
回答已采纳
2回答
library(ggplot2)
library(reshape2)
HAVE = data.frame(VARS = c("cat", "dog", "fox", "rabbit"),
"a" = c(1,2,3,4),
"b" = c(2,3,1,4),
"c" = c(3,1,2,4))
HAVE1 = melt(HAVE, id.vars="VARS"
浏览 1提问于2020-05-22得票数 2
回答已采纳
我想用ggplot2的所有列绘制一个data.frame盒图，并且我想按每一列的中值重新排序，旋转x轴标签，用对应于相同的中值的颜色填充每个框。我不知道最后那部分该怎么做。有很多例子显示填充颜色对应于一个因子变量，但是我还没有看到使用连续变量来控制填充颜色的明确例子。(我试图这么做的原因是，生成的图将为一个有力定向网络图提供上下文，其节点将以与盒图相同的方式进行颜色编码--然后颜色将提供两个图之间的映射。)如果我能为以后的情节重新使用价值到颜色的映射，这样颜色在情节之间是一致的，那就太好了。因此，例如，与具有较高中值的列变量对应的框将有一个颜色，该颜色表示此映射，并完全匹配其他绘图中相同列变量
浏览 0提问于2015-12-03得票数 1
回答已采纳
我试图在热图图中改变颜色。我想要黄色，红色的配色方案，而不是默认的蓝色-深蓝色。
我的代码
a=as.matrix(volcano, ncol=ncol(volcano))
row.names(a)= 1:nrow(a)
library(reshape2)
a1 = melt(a)
colnames(a1) = c('X','Y','value')
head(a1)
library(ggplot2)
ggplot(a1,aes(x = X, y = Y)) +
geom_raster(aes(fill = value),interpolat
浏览 2提问于2018-05-06得票数 7
我希望以一种特定的方式映射数据，以获得更好的数据可视化:我希望缩放条形标签和适用于颜色的拉伸应该基于空间平均值加或减去两个标准差。我在一篇论文中看到了这一点，但我不知道如何才能做到最好。我尝试了下面的脚本，但是得到了错误消息：
Continuous_scale中的错误(“填充”、“梯度”、seq_gradient_pal(低、高、：未使用的参数(mid = "white"，中点= 500) )
require(ggplot2)
require(maptools)
data(wrld_simpl)
mean_val <- mean(Df$layer , na.rm
浏览 4提问于2017-09-29得票数 0
我最近更新为ggplot2的2.2.0版本，但在运行我的代码时注意到了与前一个版本的不同。以前，我使用下面的代码绘制第一个geom_point行的无边界圆圈(形状21)。随后，使用第二行geom_point，我将使用黑色边框来勾画特定的圆圈(在本例中，使用$disp > 200的任何内容)。下面是我自己数据的快照：
然而，使用新的ggplot2，我无法像以前那样绘制无边界的圆圈和标记其他的圆圈。
有什么解决办法吗？
library(ggplot2)
gg <- ggplot(data=mtcars, aes(x=gear, y=mpg))
gg <- gg + ge
浏览 2提问于2016-11-26得票数 0
1回答
要绘制以下输入文件的热图，下面的代码可以很好地工作并生成下面的图像
"people","1","2","3","4","5","6","7","8","9"
"Ej1",0,0,0,1,0,1,1,NA,0
"Ej2",0,1,1,0,0,0,1,NA,0
"Ej3",0,1,1,1,0,0,0,NA,1
"Ej4",0,NA,0,0,NA,1,0,NA,1
"Ej
浏览 2提问于2015-02-19得票数 1
回答已采纳
2回答
使用保存在名为foo.txt的文件中的虚拟代码.
COG,station1,station2,station3,station4,station5
COG000Z,0.019393497,0.183122497,0.089911227,0.283250444,0.074110521
COG0002,0.044632051,0.019118032,0.034625785,0.069892277,0.034073709
COG0001,0.033066112,0,0,0,0
COG0004,0.115086472,0.098805295,0.148167492,0.040019101,0.0439
浏览 2提问于2010-11-13得票数 4
回答已采纳
3回答
当使用 (png)时，ggplot2图例与png版本有区别。梯度在png中更平滑，而不同的梯度条纹在pdf中可见。我看过pdf的文档和调整后的点大小，但这似乎并不能使梯度更平滑。如何使pdf梯度像png一样平滑
The PNG
png(file="grad1.png")
ggplot(mtcars, aes(x=cyl, y=mpg, fill=hp)) +
geom_point() +
scale_fill_gradient(low="grey88", high="black")
dev.off()
#对
浏览 4提问于2013-12-17得票数 3
回答已采纳
1回答
我正在努力生成一幅世界地图的地图，其中每个国家的颜色对应于存储在数据框架中的特定值。
> aggregated_country_data
country num_responses region
1 AL 1 Albania
2 AM 1 Armenia
3 AR 32
浏览 1提问于2015-04-27得票数 5
回答已采纳
我是ggplot2的新手，我正在尝试复制我使用filled.contour和ggplot2创建的图形。
下面是我的代码：
require(ggplot2)
require(reshape2)
#data prep
scale <- 10
xs <- scale * c(0, 0.5, 0.8, 0.9, 0.95, 0.99, 1)
ys <- scale * c(0, 0.01, 0.05, 0.1, 0.2, 0.5, 1)
df <- data.frame(expand.grid(xs,ys))
colnames(df) <- c('x'
浏览 5提问于2014-09-11得票数 8
当我在scale_fill_gradient()和geom_bar()一起在ggplot2中使用时，对于所有条形图，只填充一种默认颜色。但希望绿色变成红色，从低到高。
theTable <- within(data, Tag <- factor(tag, levels=names(sort(table(tag),
decreasing=FALSE))))
histGraph=ggplot(theTable,aes(x=Tag))+
coord_flip() +
浏览 5提问于2016-05-20得票数 6
回答已采纳
使用gplot()绘制栅格会生成一张漂亮的地图，例如：
由于可变尺度(人口)涵盖许多数量级，因此首选对数尺度。但当这应用于颜色变量时(通过向scale_fill_gradient添加trans='log'参数)，零人口的区域最终变为灰色：
有谁知道如何防止这种情况发生吗？这是我使用的代码：
require(raster, rgdal, ggplot2)
pop = readGDAL("usa_population.tif")
p = raster(pop, layer=1, values=TRUE)
s <- stack(p)
gplot(
浏览 0提问于2013-05-29得票数 1
回答已采纳
我正在尝试在ggplot2中对ggfluctuation使用两个热图。热图的两个表具有不同的最大值(假设为0.8和0.9)。为了使它们具有可比性，所以我想知道如何使它们的颜色都从0变化到1。
浏览 0提问于2013-03-02得票数 1
回答已采纳
2回答
我正在尝试用ggplot2在法国地图上画出不同的铅笔命名方式。对于法国的96个部门中的每个部门，我都有一个项目和一个与此项目相关的分数。我可以在地图上根据它们的部门来绘制这些项目，但我想不出一种方法来使每个多边形的颜色根据它们相关的分数而变化。我的数据是。生成地图的代码如下：
library(ggplot2)
library(scales)
library(Cairo)
#open data
plotDatafr = read.table("plotDatafr.txt", header=T, sep="\t", quote="", dec=&
浏览 0提问于2016-11-20得票数 0
2回答
我正在尝试使用ggplot2将因子变量绘制为条形图。
我像这样创建变量：
survey$coffeeblack2[survey$coffee == 1] <- 2
survey$coffeeblack2[survey$coffee == 2] <- 1
survey$coffeeblack2[survey$coffee == 3] <- 1
survey$coffeeblack2[survey$coffee == 4] <- 1
survey$coffeeblack2[survey$coffee == 5] <- 0
survey$coffeeblack2[sur
浏览 0提问于2015-10-21得票数 1
1回答
我正在尝试弄清楚如何在R中创建一个函数，以便在绘制时用来设置栅格中单元格的颜色。最终，我会用绘制的光栅创建这些图的.gif (我已经弄清楚了这一部分)，但颜色需要保持一致。即，在一个绘图中分配给值1的颜色需要与在下一个绘图中分配给值1的颜色相同。
栅格(至少现在)以数据框的形式存在。例如(出于示例的目的，我只是使用随机数，但这是我的实际数据的格式)
A<-data.frame(x=1:100,y=1:100,value=runif(100, 0, 10000))
B<-data.frame(x=1:100,y=1:100,value=runif(100, 5, 5300))
C&l
浏览 5提问于2015-08-24得票数 0
下面是我的数据框架： mydf <- data.frame(FIP=c(1017,1059,1061,1133,5103,12129,13123,12129),
val=c(100,100,225,400,180,278,180,321)) 我想要在一张地图上对FIP在FIP列中的美国县进行着色，但我被困在如何对这些特定的县进行着色，以便出现类似热图的东西。pop越高的县越红色，pop越低的县越蓝(就像典型的热图梯度)。 library(tidyverse)
library(usmap)
library(grDevices)
dt <- countypop %>%
浏览 20提问于2021-10-04得票数 1
回答已采纳
我想同时可视化空间数据中预测的均值和误差(方差)。一种可能的方法是将平均值映射到色调，将误差映射到饱和度或亮度。虽然我是在map中这样做的，但我将在这里提供一个简单得多的最小工作示例，该示例改编自ggplot2的文档。 library(ggplot2)
library(RColorBrewer)
dsub <- subset(diamonds, x > 5 & x < 6 & y > 5 & y < 6)
dsub$var <- dsub$x
dsub$diff <- with(dsub, sqrt(abs(x-y))* s
浏览 41提问于2014-07-17得票数 4
回答已采纳
1回答
有人能帮我把以下R基代码翻译成ggplot2吗？
编辑-我的x值是观察。例如：
x <-runif(100,min=0,max=60)
lim_x <-range(x)
lim_y <-c(0.5,3.5)
probabilities<-cbind(seq(from=0,to=1,length.out=100),
c(seq(from=0,to=1,length.out=50),seq(from=1,to=0,length.out=50)),
浏览 2提问于2021-09-14得票数 0
回答已采纳
以下是我的部分数据：
dd<-read.table (text=" Out1 Out2
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes Yes
Yes Yes
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes NO
Yes Yes
Yes Yes
Yes Yes
", header=TRUE)
我想使用ggVennDiagram获得这
浏览 9提问于2022-03-16得票数 1
回答已采纳
是否可以在ggplot2中的密度图中添加梯度填充，使图表中的颜色沿x轴变化？在下面的示例中，fill参数似乎被忽略了。
library(ggplot2)
ggplot(data.frame(x = rnorm(100)), aes(x = x, fill = x)) + geom_density()
浏览 3提问于2017-08-14得票数 6
回答已采纳
在下面的代码生成的图中，我想改变颜色，使所有小于0.6的值都与“低”颜色相同，所有大于1的值都是“高”颜色。
按照原样，颜色渐变延伸到数据的整个数值范围。我尝试添加限制，但这使得所有越界值与NA值具有相同的颜色，这不是我想要的，因为我需要缺少NA值才能清楚地突出，并且当出界值<0.6时看起来不是相同的颜色。
我相信答案是oob，打破争论，但没有成功地让它工作。
library(ggplot2)
a = rnorm(17*17, 0.733,0.21)
qcMat = matrix(a, ncol = 17)
qcMat[qcMat> 1] = 1
#qcMat contains v
浏览 5提问于2014-05-14得票数 27
回答已采纳
1回答
下面是我试图解决的问题的一个可重现的例子。我已经在ggplot2中创建了一个热图，一切都很顺利。由于我已经在数据上添加了百分号，以便与geom_text一起使用，因此我想让geom_tile的图例也显示百分号(现在我只能将实际值乘以100 )。理想情况下，我希望右侧的图例栏显示8%，4%，0%，-4%，-8%。
#load in libraries
require(plyr)
require(dplyr)
require(reshape2)
require(ggplot2)
require(scales)
testDF <- structure(list(strategies = st
浏览 0提问于2015-03-23得票数 18
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
