小编use*_*579的帖子

我想在矩阵中做多次替换.例如,

x <-sample(1:20,50,rep=T)
replace(x, x == 4, 2)

使用replace替换x中的4等于2的元素.但是,我怎么能代替 x == 4用2,x ==3用4而x == 5用6.

是否有任何内置功能(4,3,5)分别替换(2,4,6)？

如何提高以下代码的速度？

for (i in 1:nrow(training)){
     score[training[i,1],training[i,2],training[i,4]] = training[i,3] 
  }

Training是一个有四列的矩阵.我只想构建一个数值,其值是training[i,3]根据上面的公式.

谢谢!

大家好,我不熟悉ggplot2.现在我对它有疑问.以下是生成一个图的代码

data <- data.frame(age=sample(c("25-29","30-34"),100,rep=TRUE),ratio=rnorm(100,mean=1,sd=0.3))
library(ggplot2)
qplot(ratio, data=data, geom="bar", fill=age, binwidth=0.1)

这是我的问题.
(1)如何改变直方图的颜色？
(2)如何将图例放在面板中？
(3)如何改变背景颜色？

首先十分感谢!