- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我正在绘制一个相当大的散点图,我正在使用 ggrepel 作为避免标签重叠的方法。但是,我需要区分一些数据点,我的想法是还依赖于 size
和 face
来做到这一点。
我发布数据集:
structure(list(horizontal = c(-0.352696359157562, 0.780073940753937,
0.0911642983555794, -0.153335213661194, -0.540096700191498, -0.615496337413788,
0.310178399085999, 0.797275483608246, -0.157139003276825, -0.33426907658577,
0.253628611564636, 0.474333256483078, 0.0280635561794043, -0.522810518741608,
0.712112784385681, 0.156166926026344, 0.378900289535522, -0.10096962749958,
-0.751460909843445, 0.000464908313006163, -0.368376433849335,
-0.0745543912053108, -0.496564328670502, 0.703955709934235, -0.10785873234272,
0.371504008769989, -0.586291670799255, 0.191669017076492, -0.154560878872871,
0, 0.843597233295441, 0.449101448059082, -0.241541013121605,
-0.0455610118806362, -0.382365942001343, -0.00278944987803698,
0.0590433552861214, -0.328732430934906, 0.0665241554379463, -0.384352385997772,
-0.104266256093979, -0.330000370740891, 0.638868570327759, 0.319561064243317,
-0.373574942350388, 0.298344343900681, -0.394538104534149, -0.994185328483582,
0.654802262783051, -0.0239639095962048, -0.14082495868206, 0.726947605609894,
0.067158117890358, 1.09101295471191, 0.808771371841431, -0.511610448360443,
0.873182356357574, 0.33600190281868, -0.62741494178772, 0.253036916255951,
-0.717691659927368, 0.329070538282394, 0.364699423313141, -0.0409119315445423,
-0.356035232543945, -0.00621286546811461, 0.333550602197647,
-0.327464520931244, 0.163056030869484, 0.441578358411789, -0.463090926408768,
0.791485249996185, -1.08877301216125, 0.0416726917028427, -0.581684827804565,
0.389889031648636, -0.32378751039505, 0.184145957231522, -0.291793346405029,
-0.046744417399168, -0.593223035335541, -0.619257867336273, -0.41385293006897,
0.565666615962982, -0.486125022172928, 0.246443659067154, -0.0412923097610474,
0.893342435359955, 0.337903827428818, -0.551677107810974, 0.401258170604706,
-0.628006637096405, 0.148221224546432, -0.0568033419549465, -0.530756235122681
), vertical = c(-0.176369309425354, 0.474502354860306, 0.0566342882812023,
0.611396670341492, 0.376279890537262, 0.59516716003418, -0.177679508924484,
-0.549056708812714, 0.0260348655283451, -0.0717226788401604,
-0.104350790381432, -0.202235117554665, -0.110944032669067, 0.147080093622208,
-0.0262884516268969, 0.0451383702456951, 0.615623116493225, 0.445720255374908,
0.0480968803167343, 0.400624185800552, 0.248091980814934, -0.716846406459808,
0.11407159268856, -0.152194082736969, 0.0246401410549879, 0.150926142930984,
-0.437859088182449, 0.0160182043910027, 0.20544721186161, 0.197501495480537,
-0.0254431646317244, 0.218464657664299, 0.119692757725716, 0.0423489212989807,
0.0680879354476929, 0.0461949817836285, -0.037192665040493, -0.0420530699193478,
-0.252572000026703, -0.365248888731003, -0.542886137962341, 0.195641875267029,
-0.243147045373917, 0.156293720006943, 0.128018841147423, 0.592842638492584,
0.29944321513176, 0.0551972948014736, 0.0954329967498779, -0.230890363454819,
0.291117131710052, -0.123327493667603, 0.298259824514389, 0.291962414979935,
0.0570146627724171, -0.248049721121788, -0.147798582911491, -0.363093376159668,
0.121045224368572, -0.186850875616074, 0.0238371174782515, 0.201136231422424,
0.0619173347949982, -0.0573527812957764, -0.345680475234985,
-0.637051165103912, -0.174467399716377, -0.155659765005112, -1.08539187908173,
-0.414698243141174, 0.499438345432281, 0.0502946302294731, -1.10627043247223,
0.559918701648712, 0.125187128782272, 0.52006334066391, -0.0163563191890717,
-0.787765979766846, 0.10916892439127, 0.313010096549988, 0.167831897735596,
0.128610551357269, 0.0104815689846873, -0.134907931089401, 0.116861052811146,
-0.164915651082993, -1.09490132331848, -0.140782698988914, 0.54309743642807,
0.206757411360741, 0.346103101968765, -0.108830809593201, 0.241710051894188,
-0.327760368585587, 0.185540676116943), issue = c("issue", "issue",
"issue", "issue", "issue", "issue", "issue", "issue", "issue",
"issue", "issue", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party", "party", "party", "party", "party", "party",
"party", "party"), year = c("9999", "9999", "9999", "9999", "9999",
"9999", "9999", "9999", "9999", "9999", "9999", "05", "05", "05",
"05", "05", "05", "05", "05", "06", "06", "06", "06", "06", "06",
"06", "06", "07", "07", "07", "07", "07", "07", "07", "07", "07",
"07", "07", "08", "08", "08", "08", "08", "09", "09", "09", "09",
"09", "10", "10", "10", "10", "10", "10", "10", "10", "11", "11",
"11", "11", "11", "11", "11", "11", "11", "11", "12", "12", "12",
"12", "12", "12", "12", "12", "12", "13", "13", "13", "13", "13",
"13", "13", "13", "15", "15", "15", "15", "15", "15", "15", "15",
"15", "16", "16", "16"), object_n = c("welfare", "ecolib", "ecoreform",
"europe", "cultlib", "immig", "security", "defense", "edu", "env",
"infra", "cons05", "lab_uk05", "libdem05", "union05", "spd05",
"fdp_d05", "gr_d05", "linke/pds05", "övp06", "spö06", "fpö06",
"gr_a06", "cda06", "pvda06", "vvd06", "sp06", "rpr/ump07", "psf07",
"udf07", "svp07", "fdp_ch07", "sps07", "cvp07", "gr_ch07", "fg07",
"ff07", "lab_irl07", "övp08", "spö08", "fpö08", "gr_a08", "bzö08",
"union09", "spd09", "fdp_d09", "gr_d09", "linke/pds09", "cons10",
"lab_uk10", "libdem10", "cda10", "pvda10", "vvd10", "rr_nl10",
"sp10", "svp11", "fdp_ch11", "sps11", "cvp11", "gr_ch11", "fg11",
"ff11", "lab_irl11", "sf11", "indep_irl11", "rpr/ump12", "psf12",
"rr_f12", "cda12", "pvda12", "vvd12", "rr_nl12", "d6212", "sp12",
"övp13", "spö13", "fpö13", "gr_a13", "union13", "spd13", "gr_d13",
"linke/pds13", "cons15", "lab_uk15", "libdem15", "ukip15", "svp15",
"fdp_ch15", "sps15", "cvp15", "gr_ch15", "fg16", "ff16", "sf16"
)), .Names = c("horizontal", "vertical", "issue", "year", "object_n"
), row.names = c(NA, -95L), class = c("tbl_df", "tbl", "data.frame"
))
目前我使用下面的代码来指定情节:
ggplot(dat, aes(horizontal, vertical)) +
geom_point(data=subset(dat, dat$issue=="issue"),
color = 'black', size=5, shape=3) +
geom_point(data=subset(dat, dat$issue=="party"),
color = 'black', aes(shape=year), size=2) +
scale_shape_manual(values=c(19,15,17,10,11,12,18,13,14,7,8,9,0,5,1))+
geom_text_repel(data=subset(dat, dat$issue=="party"),
aes(horizontal, vertical, label = object_n), size=2.5, family = "Franklin Gothic Demi") +
geom_text_repel(data=subset(dat, dat$issue=="issue"),
aes(horizontal, vertical, label = object_n), size=3.2,
family = "Franklin Gothic Demi",
fontface = 'bold') +
theme_classic(base_size = 16) +
theme(axis.line=element_blank(),axis.text.x=element_blank(),
axis.text.y=element_blank(),axis.ticks=element_blank(),
axis.title.x=element_blank(),
axis.title.y=element_blank(),legend.position="none",
panel.background=element_blank(),panel.border=element_blank(),panel.grid.major=element_blank(),
panel.grid.minor=element_blank(),plot.background=element_blank())
这工作正常,并产生以下情节:
但是,问题是如果我为两个子集指定了 geom_text_repel
,标签将重叠,这就失去了使用这个 geom 的意义。您知道如何在具有条件 size
和 face
的 geom_text_repel
中设置它吗?我尝试过类似于 what is suggested here 的方法,但我不断遇到错误:ggplot2 doesn't know how to deal with data of class uneval
例如,这是我尝试过的:
ff <- function(issue){ifelse(dat$issue=="issue",3.2,2.5)}
mds <- ggplot(dat, aes(horizontal, vertical)) +
geom_point(data=subset(dat, dat$issue=="issue"),
color = 'black', size=5, shape=3) +
geom_point(data=subset(dat, dat$issue=="party"),
color = 'black', aes(shape=year), size=2) +
scale_shape_manual(values=c(19,15,17,10,11,12,18,13,14,7,8,9,0,5,1))+
geom_text_repel(dat,aes(horizontal, vertical, label = object_n, size = factor(issue)),
family = "Franklin Gothic Demi") + scale_size_manual(values=ff(issue)) +
theme_classic(base_size = 16) +
theme(axis.line=element_blank(),axis.text.x=element_blank(),
axis.text.y=element_blank(),axis.ticks=element_blank(),
axis.title.x=element_blank(),
axis.title.y=element_blank(),legend.position="none",
panel.background=element_blank(),panel.border=element_blank(),panel.grid.major=element_blank(),
panel.grid.minor=element_blank(),plot.background=element_blank())
mds
非常感谢任何帮助!
最佳答案
这对你有帮助吗?只需为 fontface
创建一个新变量并使用 scale_size_manual
来模拟您现有的文本大小:
library(tidyverse)
library(ggrepel)
# this is a nice helper fxn if you are using the same theme a lot :)
theme_set(theme_classic(base_size = 16) +
theme(axis.line=element_blank(),axis.text.x=element_blank(),
axis.text.y=element_blank(),axis.ticks=element_blank(),
axis.title.x=element_blank(),
axis.title.y=element_blank(),legend.position="none",
panel.background=element_blank(),panel.border=element_blank(),panel.grid.major=element_blank(),
panel.grid.minor=element_blank(),plot.background=element_blank()))
dat$ff <- ifelse(dat$issue == "issue", "bold", "plain")
ggplot(dat, aes(horizontal, vertical)) +
geom_point(data=subset(dat, dat$issue=="issue"),
color = 'black', size=5, shape=3) +
geom_point(data=subset(dat, dat$issue=="party"),
color = 'black', aes(shape=year), size=2) +
scale_shape_manual(values=c(19,15,17,10,11,12,18,13,14,7,8,9,0,5,1)) +
geom_text_repel(aes(label = object_n, size = issue, fontface = ff)) +
scale_size_manual(values = c(3.5, 2.5))
请记住,文本的最终大小部分取决于您用于录制的图形设备的大小。这是它看起来像一个宽度为 800 像素和高度为 511 像素的 png:
关于r - geom_text_repel 中的条件尺寸和面孔,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/45483903/
我正在查看 DOOM 源代码,我找到了 this行。 void * Z_Malloc (int size, int tag, void *user)
关闭。这个问题需要details or clarity .它目前不接受答案。 想改进这个问题吗? 通过 editing this post 添加细节并澄清问题. 关闭 9 年前。 Improve t
我正从 Python 和 Numpy 转向 C++ 和 Eigen。 在 Python 中,我可以使用 .shape 属性获取 Numpy 数组/矩阵的形状(维度),如下所示: import nump
固定嵌入式YouTube视频的宽度并自己照顾自己的高度是否安全? 我有一个应用程序,用户可以将通知发布到公告板上。这些通知主要是文本(带有有限的html标签)和嵌入式图像。我现在要添加对嵌入式YouT
可以轻松创建一个 THREE.BoxGeometry,在创建宽度、高度和深度的三个独立参数时,您必须在其中传递参数。 我想创建任何和所有不带参数的THREE[types](),并在之后设置值。 有没有
我在 HTML 页面上有一个 Canvas : 属性width和height将 Canvas 拉伸(stretch)到某个字段,但不调整其大小。所以 var canvasElement = docu
我在我的 css 中使用 @media all 和 (max-width: 600px) {} 作为响应式菜单,问题是它没有正确显示。 我想让橙色填充绿色空间……当然,还要将绿色空间变成透明的。基本上
(我知道我问了很多关于这个的问题!) 基本上,我正在尝试将一些代码从 Matlab 转换为 C++,我遇到了这个: n = sum(size(blocks)) - len; 现在我计算了 vector
您好,我有一个用于创建产品的表单。用户应该能够选择类别(例如 T 恤),然后 T 恤的所有尺码(例如 S、M、L)都会下拉。用户可以输入每种尺寸的数量。 Javascript 对此不起作用。用户可以选
我正在尝试在页脚中定位和调整我的社交图标链接的大小,但是,这些命令似乎都没有效果,尤其是当我尝试调整它们的大小时。我试过将宽度和高度标记为“!重要”,但这也没有效果。 这是代码的 JSFiddle:h
我目前正在创建一个 HTML5 canvas基于绘图程序。用户可以绘制一张图像或几张图像“页面”,并将其保存到云端以供日后快速检索。这是用于交互式白板的;老师不能总是确定他们计划类(class)使用的
为网站存储图像的最佳方式是什么? 我不应该超过什么尺寸? 现在,我将所有界面文件保存在 png(主要是 Sprite )中,并将常用图像保存在 jpg 中。一些图像大约为 100-150Kb。 保存图
在 fancybox 主页 ( http://fancybox.net/home ) 中,有一个打开尺寸为屏幕 75% 的 iFrame 的示例。 我无法按照网站上的说明通过修改 .js 文件的宽度和
我想做一个仅适用于 iPhone 4 的应用程序,该应用程序使用 iAd AdBannerView。当我添加它时,它的固定大小为 320x50。在更高分辨率下这如何工作? 有人可以解释一下 iPhon
我们有一个 NSString,我们使用 - (NSSize)sizeWithAttributes:(NSDictionary *)attributes 来测量边界框。一切都好。 现在我们使用标准 NS
我想知道 Canvas 的宽度和高度,但我只知道它的 HDC。 我尝试过这段代码: procedure TForm92.Button1Click(Sender: TObject); var hBi
问题是如何使用数学从 START SVG 维度(不带旋转)和 END SVG 维度(带旋转)获取 >开始 SVG 信息。基本上,要从 START SVG 到 END SVG,我需要执行 -115.60
我的问题是,我有一个包含50万行的Oracle表。我设置了sqoop以将其作为 Parquet 文件导入到HDFS。我将--num-partition参数设置为32,得到了32个 Parquet 文件
是否可以更改 WordPress 中当前主题的 YouTube(或其他视频)的默认嵌入尺寸?我搜索了一个插件和一些代码,但似乎找不到。 我的意思是当您将 YouTube 网址粘贴到帖子或页面中时使用的
我有一个组,其中包含一个矩形和顶部的图像。我希望矩形可以调整大小,并且图像应该具有固定大小,除非矩形小于图像的情况。然后图像应该随着矩形缩小。 图像还应该始终居中并有一些填充。 除了图像的缩小尺寸部分
我是一名优秀的程序员,十分优秀!