有什么方法可以使散点图中的绘图点在 R 中更加透明

s <- read.table("/.../parse-output.txt", sep="\t") 
dim(s) 
[1] 67124     3
x <- s[,1] 
y <- s[,2]
z <- s[,3] 
cols <- cut(z, 6, labels = c("pink", "red", "yellow", "blue", "green", "purple"))
plot(x, y, main= "Fragment recruitment plot - FR-HIT", ylab = "Percent identity", xlab = "Base pair position", col = as.character(cols), pch=16) 

library(scales)
cols <- cut(z, 6, labels = c("pink", "red", "yellow", "blue", "green", "purple"))
plot(x, y, main= "Fragment recruitment plot - FR-HIT", 
     ylab = "Percent identity", xlab = "Base pair position", 
     col = alpha(cols, 0.4), pch=16) 
# For an alpha of 0.4, i. e. an opacity of 40%.

R相关问答推荐

在集合群体模型中计算时间步依赖的速率/参数

R中的滞后累积量

使用map()内的公式()创建多个公式

使用Shiny组合和显示复制和粘贴的数据

geom_Ribbon条件填充创建与数据不匹配的形状(ggplot 2 r)

如果列中存在相同的字符串，则对行值进行总和

基于现有类创建类的打印方法(即，打印tibles更长时间)

如何修复R码的置换部分？

带有叠加饼图系列的Highmap

如何使用R对每组变量进行随机化？

R根据条件进行累积更改

使用整齐的计算(curl -curl )和杂音

基于R中的间隔扩展数据集行

使用RSelenium在R中抓取Reddit时捕获多个标签

函数可以跨多个列搜索多个字符串并创建二进制输出变量

将数据集旋转到长格式，用于遵循特定名称模式的所有变量对

有没有办法定制Plot(allEffects())面板标题？

快速合并R内的值

需要一个函数来在第一行创建一个新变量，然后用新变量替换一个不同的变量(对于多行)

将边列表转换为路径长度列表