小编Sop*_*hia的帖子

有没有办法在R会话中获取当前Windows用户名或Windows主页？

谢谢.
(对不起,如果我错过了什么,但我找不到任何东西)

在我的情节中,我有两个相交的多边形,一个是彩色的,一个是阴影线.在图例中,我希望正确表示两个多边形和交叉点数组.这是我有的:

plot(1:4, 1:4, type="n", xaxt="n", xlab="", yaxt="n", ylab="")
polygon(c(2,4,2), c(1,3,3), col="gray")
polygon(c(3,3,1), c(1,3,2), col="red", density=10)
legend("topleft", legend=c("A", "B", "AB"), fill=c("gray", "red", "gray"),
           density=c(NA, 10, NA), bty="n") 

是否可以将B图例中的边框颜色更改为红色,并将红色阴影线添加到AB的符号中？

我想计算组内连续值之间的比率.差异很容易使用diff:

mdata <- data.frame(group = c("A","A","A","B","B","C","C"), x = c(2,3,5,6,3,7,6))   
mdata$diff <- unlist(by(mdata$x, mdata$group, function(x){c(NA, diff(x))}))
mdata

  group x diff
1     A 2   NA
2     A 3    1
3     A 5    2
4     B 6   NA
5     B 3   -3
6     C 7   NA
7     C 6   -1

是否有计算比率的等效函数？期望的输出将是:

  group x     ratio
1     A 2        NA
2     A 3 1.5000000
3     A 5 1.6666667
4     B 6        NA
5     B 3 0.5000000
6     C 7        NA
7     C 6 …

有没有办法只对箱线图的中线进行着色,而不是整个箱线图.

当我尝试这个:

boxplot(matrix,col="red")

然后整个盒子变成红色.我想只为盒子图的中线着色.

有没有办法在R ??