我对编程很陌生，面临着一个特定的问题。我有以下两个矢量，一个有费用，另一个有12个月的收入：''
revenue <- c(14574.49, 7606.46, 8611.41, 9175.41, 8058.65, 8105.44, 11496.28, 9766.09, 10305.32, 14379.96, 10713.97, 15433.50)
expenses <- c(12051.82, 5695.07, 12319.20, 12089.72, 8658.57, 840.20, 3285.73, 5821.12, 6976.93, 16618.61, 10054.37, 3803.96)
''
如果收入大于12个月的平均收入，我必须能够列出利润(收入-支出(列表。我好像想不通。
这是我在下面尝试得到的：''
for(i in 1:length(revenue)){
if(revenue > mean.revenue){
good_months <- c(revenue>mean.revenue)
}
}
good_months
''
问题是，在这几个月里，它只能得出正确或错误的结果。我怎样才能只得到True值？
也许你可以使用这个
> which(revenue > mean(revenue))
[1] 1 7 10 11 12
> (revenue - expenses)[revenue > mean(revenue)]
[1] 2522.67 8210.55 -2238.65 659.60 11629.54