在 RI 中，希望根据人们的排名偏好以及他们的表现来分配项目。假设我有 5 个项目和 3 个人。在这种情况下，三个人都想要项目 A，因为这是他们的首选，但安娜应该得到它，因为她的表现得分最高。现在她已经排除在外了，詹姆斯和比利都在争夺项目 B，比利应该得到这个项目，因为他有更好的绩效衡量标准。我怎样才能在 R 中做到这一点？现实中我会有更多的项目和人。
Project Rank Person Performance
A 1 Billy 95
B 2 Billy 95
C 3 Billy 95
D 4 Billy 95
E 5 Billy 95
A 1 Anna 97
B 2 Anna 97
C 3 Anna 97
D 5 Anna 97
E 4 Anna 97
A 1 James 92
B 2 James 92
C 4 James 92
D 3 James 92
E 5 James 92
编辑
根据问题的新数据 - 请参阅对已接受答案的评论。
structure(list(Project …我有一些跟踪数据,我想计算轨道过程中的方位.对于两点,我们可以使用fossil包中的函数:
# earth.bear(long1, lat1, long2, lat2)
earth.bear(-10.54427, 52.11112, -10.55493, 52.10944)
# 255.6118
但是,这不会超过两点.这是一些示例数据:
tracks <- read.table(text =
"latitude, longitude
52.111122, -10.544271
52.10944, -10.554933
52.108898, -10.558025
52.108871, -10.560946
52.113991, -10.582005
52.157223, -10.626506
52.194977, -10.652878
52.240215, -10.678817
52.26421, -10.720366
52.264015, -10.720642", header = TRUE, sep = ",")
我试图通过添加 来重新着色我的 ggplot 对象的图例theme(legend.key = element_rect(fill = "white"))，但图例仍然是灰色的。奇怪的是，当我选择 以外的颜色时，此代码有效"white"。
这是一个带有一些虚拟数据的小示例：
## Dummy data
response <- rnorm(60, 50, 4)
year <- rep(c(1:10), 6)
treatment <- c(rep("A",30), rep("B", 30))
group <- c(rep(1, 20), rep(2, 20), rep(3, 20))
mydata <- data.frame(response, year, treatment, group)
library(ggplot2)
plot <- ggplot(mydata, aes(
x = year,
y = response,
linetype = treatment,
color = as.factor(group)
)) + geom_smooth()
## Specifying 'white' fill
plot + theme(legend.key = element_rect(fill = "white"))
#> `geom_smooth()` using method …我正在研究一个有后代有性繁殖的模型,因此有两种代理类型,男性和女性.我要求代理商在达到一定年龄后再现:400蜱并且每400蜱继续这样做.
如果有男性,女性应该只生一个孩子.该模型适用于前几代,但随后人口爆炸.一个女性和一个男性的起始人口数量如下:2,3,7,19,575.我不知道为什么它突然从19增加到575.
看起来有些女性后代在出生后立即复制,尽管age = 0他们没有遵循这个命令:
ask females [
if age > 0 and age mod 400 = 0 [
reproduce
]
这是完整的模型:
turtles-own [age]
breed[males male]
breed[females female]
females-own [ mates max-mate-count mate-count availa-males mother father]
to setup
clear-all
crt 2 [
ifelse random 2 = 1 [set breed males] [set breed females]
]
ask females [set color grey
setxy random-xcor random-ycor
]
ask males [set color red
setxy random-xcor random-ycor
]
reset-ticks
end
to go
ask turtles …我有一个如下所示的数据框:
ID value condition
A 0 0
A 3 0
A 0 1
A 7 1
A 5 0
A 5 0
A 5 0
A 7 0
B 6 0
B 2 1
B 7 0
B 10 1
B 0 0
B 6 0
我想在满足条件时更改ID名称,并更改后面的ID名称.每个ID可以满足多次条件,所以我每次都要修改它.
结果将更改原始ID或只添加新列:
ID value condition newID
A 0 0 A
A 3 0 A
A 0 1 A1
A 7 1 A1
A 5 0 A2
A 5 0 A2
A 5 0 A2 …