我试图用来geom_point
说明我的数据计数.我还想在图表中注明一些要点geom_text
.当我添加调用时geom_text
,它似乎正在绘制图例中点下方的内容.我试过扭转层的顺序无济于事.我无法理解为什么会这样做.谁看过这个吗?
set.seed(42)
df <- data.frame(x = 1:10
, y = 1:10
, label = sample(LETTERS,10, replace = TRUE)
, count = sample(1:300, 10, replace = FALSE)
)
p <- ggplot(data = df, aes(x = x, y = y, size = count)) + geom_point()
p + geom_text(aes(label = label, size = 150, vjust = 2))
Run Code Online (Sandbox Code Playgroud)
我正在绘制一张有不同疟疾寄生虫抗药性研究地点的地图.研究地点的大小相对于采样的疟疾寄生虫数量而言,这些点的填充是抗药性疟疾寄生虫比例的0到1的梯度.以下代码显示以下地图:
###GENERATING AFRICA MAP###
africa = readOGR("/Users/transfer/Documents/Mapping Files/Africa Countries/Africa_SHP", layer="dissolved")
#FIXING THE NON-NODED INTERSECTS#
africa = gBuffer(africa, width=0, byid=TRUE)
#CREATING DATA FRAME FOR GGPLOT#
africa.map = fortify(africa, region="ID")
###PLOTTING SPM.437###
#SCALING THE SAMPLE SIZE USING CUBE-ROOT#
size = d.spm.437$Tot437^(1/3)
#PLOTTING#
ggplot(africa.map, aes(x = long, y = lat, group = group)) +
geom_polygon(colour="black", size=0.25, fill="white", aes(group=group)) +
geom_point(data = d.spm.437, aes(x = long, y = lat, fill=Frc437, group=NULL, size=Tot437),
size=size, shape=21, colour="black", size=0.5)
Run Code Online (Sandbox Code Playgroud)
我尝试使用颜色选项,但它不起作用:
ggplot(africa.map, aes(x = long, y = lat, …
Run Code Online (Sandbox Code Playgroud) 我知道我可以使用plot命令中的type ="o"参数创建一个带有线和点的图.我希望能有更多的控制权 - 我希望能够将"o"绘制为全点,我选择的黑色边框和填充颜色,自定义尺寸以及与线条不同的颜色.同样的线,我想让它更厚,我的颜色选择.我将如何继续这样做?
我到现在所发现的只是一个平原
plot(y, type= "o")
Run Code Online (Sandbox Code Playgroud)
这对我的需求太差了.
我对使用ggplot不感兴趣,而是使用R的内部绘图库.任何帮助表示赞赏.
我是从另一个论坛(https://www.biostars.org/p/268514/#268559)交叉发布的,在那儿我得到了有用的评论,但仍然对ggplot2的输出感到困惑。
我试图在圆上得到一个简单的黑色轮廓,但是我的代码现在给出了随机的颜色,并且似乎忽略了我的scale_colour_manual(values = cols)参数。当我运行以下代码时:
# creating color palette
> cols <- c("red" = "red", "orange" = "orange", "nonsignificant" = "darkgrey", "Increased" = "#00B2FF", "Decreased" = "#00B2FF")
# Make a basic ggplot2 object
> vol <- ggplot(data, aes(x = lfc, y = pval, color = color, labels=gene))
# inserting mnaual colors as per color pallette with term "scale_colour_manual(values = cols)" below
> vol +
ggtitle(label = "Volcano Plot", subtitle = "Colored by fold-change direction") +
geom_point(size = 2.5, alpha …
Run Code Online (Sandbox Code Playgroud) 我在ggplot2中整理了一个气泡图,并希望改变我的气泡轮廓(以符合工作的格式指南).我的问题是我使用颜色来组合变量,而我正在使用自定义调色板(再次,用于工作).理想情况下,我想在气泡上加上黑色边框.
这是我的数据框架:
mmur <- structure(list(Medgrowth = c(-1.02232983588915, 3.01155115511551,-0.220617729642996, 1.96506550218342, 0.943970767356888, 0.810810810810807,0.0166694449074782, 0.21064457239153, 0.0876731544801004, 0.132216835610393,0.370644922164558,0.23378141437756, 1.27810650887574, 0.42301184433164,0.394880174291941, 0.54216172568924, 1.32690882134916, 0.499722376457527,-0.108885017421599), Medunemp = c(4.430550475, 2.5060469975,4.1239796475, 2.0585977455, 3.846659243, 3.1792594425, 4.0033450105,6.0882984255, 3.091889808,3.7462810695, 2.4038147815, 3.0065393475,2.3331894185, 4.9482480125, 2.0955470885, 1.616694725, 1.873037069,3.060170157, 3.0131425595), Empsize = c(324.2,270.6, 962.1,149, 962.4, 421.1, 1197.8, 777.8, 552.8, 234.8, 421.1, 203.2,915.7, 396.1, 685.9, 904.5, 1366.9, 215.4, 440.5), Eduratio = c(0.1,0.2, 0.1, 0.2, 0.1, 0.2, 0.1, 0.1, 0.1, 0.3, 0.3, 0.2, 0.5, 0.2,0.3, 0.6, 0.4, 0.2, 0.1), Names = structure(c(3L, 12L, 11L, 7L,5L, 19L, 17L, …
Run Code Online (Sandbox Code Playgroud)