Fix bug of Barnett's location features
parent
3986f4e185
commit
8d4a0718e8
|
@ -22,10 +22,10 @@ function(out){
|
||||||
}
|
}
|
||||||
if(l1+l2==0){phatall=length(ID2)/(length(ID1)+length(ID2))}
|
if(l1+l2==0){phatall=length(ID2)/(length(ID1)+length(ID2))}
|
||||||
#flight distances
|
#flight distances
|
||||||
fd=apply(out[ID1,],1,function(xx) sqrt((xx[2]-xx[5])^2+(xx[3]-xx[6])^2))
|
fd=apply(matrix(out[ID1,],ncol=7),1,function(xx) sqrt((xx[2]-xx[5])^2+(xx[3]-xx[6])^2))
|
||||||
|
|
||||||
# flight times: ft
|
# flight times: ft
|
||||||
ft=apply(out[ID1,],1,function(xx) (xx[7]-xx[4]))
|
ft=apply(matrix(out[ID1,],ncol=7),1,function(xx) (xx[7]-xx[4]))
|
||||||
fxs=out[ID1,2]
|
fxs=out[ID1,2]
|
||||||
fys=out[ID1,3]
|
fys=out[ID1,3]
|
||||||
# flight angles range [0,2pi]: fa
|
# flight angles range [0,2pi]: fa
|
||||||
|
|
Loading…
Reference in New Issue